123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778 |
- #ifndef __MATH
- #define __MATH
- #pragma lib "/$M/lib/ape/libap.a"
- /* a HUGE_VAL appropriate for IEEE double-precision */
- /* the correct value, 1.797693134862316e+308, causes a ken overflow */
- #define HUGE_VAL 1.79769313486231e+308
- #ifdef __cplusplus
- extern "C" {
- #endif
- extern double acos(double);
- extern double asin(double);
- extern double atan(double);
- extern double atan2(double, double);
- extern double cos(double);
- extern double hypot(double, double);
- extern double sin(double);
- extern double tan(double);
- extern double cosh(double);
- extern double sinh(double);
- extern double tanh(double);
- extern double exp(double);
- extern double frexp(double, int *);
- extern double ldexp(double, int);
- extern double log(double);
- extern double log10(double);
- extern double modf(double, double *);
- extern double pow(double, double);
- extern double sqrt(double);
- extern double ceil(double);
- extern double fabs(double);
- extern double floor(double);
- extern double fmod(double, double);
- extern double NaN(void);
- extern int isNaN(double);
- extern double Inf(int);
- extern int isInf(double, int);
- #ifdef _RESEARCH_SOURCE
- /* does >> treat left operand as unsigned ? */
- #define Unsigned_Shifts 1
- #define M_E 2.7182818284590452354 /* e */
- #define M_LOG2E 1.4426950408889634074 /* log 2e */
- #define M_LOG10E 0.43429448190325182765 /* log 10e */
- #define M_LN2 0.69314718055994530942 /* log e2 */
- #define M_LN10 2.30258509299404568402 /* log e10 */
- #define M_PI 3.14159265358979323846 /* pi */
- #define M_PI_2 1.57079632679489661923 /* pi/2 */
- #define M_PI_4 0.78539816339744830962 /* pi/4 */
- #define M_1_PI 0.31830988618379067154 /* 1/pi */
- #define M_2_PI 0.63661977236758134308 /* 2/pi */
- #define M_2_SQRTPI 1.12837916709551257390 /* 2/sqrt(pi) */
- #define M_SQRT2 1.41421356237309504880 /* sqrt(2) */
- #define M_SQRT1_2 0.70710678118654752440 /* 1/sqrt(2) */
- extern double hypot(double, double);
- extern double erf(double);
- extern double erfc(double);
- extern double j0(double);
- extern double y0(double);
- extern double j1(double);
- extern double y1(double);
- extern double jn(int, double);
- extern double yn(int, double);
- #endif
- #ifdef __cplusplus
- }
- #endif
- #define isnan(x) isNaN(x)
- #define isinf(x) isInf(x, 0)
- #endif /* __MATH */
|