home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / l / l010 / 5.ddi / C5.ARC / DISK_C.C < prev    next >
Encoding:
C/C++ Source or Header  |  1989-12-20  |  787 b   |  38 lines
  1. /*
  2. This Disk-Based BlackBox performs the same action as the ARCTAN.C BlackBox.
  3.  
  4. It requests a variable to get the arctangent value of,
  5. and a variable to put that result into.
  6.  
  7. */
  8.  
  9. #include <syngate1.h>
  10. #include <math.h>
  11.  
  12.  
  13.  
  14.  
  15. struct BlackBox_Parameter_Block {
  16.  
  17.     unsigned language_type;      /* present in all parameter blocks */
  18.     double *arctangent_result;      /* the last parameter requested */
  19.     double *arctangent_argument;  /* the first parameter requested */
  20.  
  21. };
  22.  
  23.  
  24. struct BlackBox_Parameter_Block *Parameter_Block;
  25.  
  26. struct BlackBox_Parameter_Block *GET_BLACKBOX_PARAMETER_PTR ();
  27.  
  28. main ()
  29.  
  30. {
  31.  
  32.     Parameter_Block = GET_BLACKBOX_PARAMETER_PTR ();
  33.  
  34.     *(Parameter_Block->arctangent_result) = atan (*(Parameter_Block->arctangent_argument));
  35.  
  36. }
  37.  
  38.