1 #ifndef __MATH 2 #define __MATH 3 #pragma lib "/$M/lib/ape/libap.a" 4 5 /* a HUGE_VAL appropriate for IEEE double-precision */ 6 /* the correct value, 1.797693134862316e+308, causes a ken overflow */ 7 #define HUGE_VAL 1.79769313486231e+308 8 9 #ifdef __cplusplus 10 extern "C" { 11 #endif 12 13 extern double acos(double); 14 extern double asin(double); 15 extern double atan(double); 16 extern double atan2(double, double); 17 extern double cos(double); 18 extern double sin(double); 19 extern double tan(double); 20 extern double cosh(double); 21 extern double sinh(double); 22 extern double tanh(double); 23 extern double exp(double); 24 extern double frexp(double, int *); 25 extern double ldexp(double, int); 26 extern double log(double); 27 extern double log10(double); 28 extern double modf(double, double *); 29 extern double pow(double, double); 30 extern double sqrt(double); 31 extern double ceil(double); 32 extern double fabs(double); 33 extern double floor(double); 34 extern double fmod(double, double); 35 36 #ifdef __cplusplus 37 } 38 #endif 39 40 41 #ifdef _RESEARCH_SOURCE 42 /* does >> treat left operand as unsigned ? */ 43 #define Unsigned_Shifts 1 44 45 extern double hypot(double, double); 46 #endif 47 #endif /* __MATH */ 48