48 one= 1.00000000000000000000e+00,
49 pi = 3.14159265358979311600e+00,
52 pS0 = 1.66666666666666657415e-01,
53 pS1 = -3.25565818622400915405e-01,
54 pS2 = 2.01212532134862925881e-01,
55 pS3 = -4.00555345006794114027e-02,
56 pS4 = 7.91534994289814532176e-04,
57 pS5 = 3.47933107596021167570e-05,
58 qS1 = -2.40339491173441421878e+00,
59 qS2 = 2.02094576023350569471e+00,
60 qS3 = -6.88283971605453293030e-01,
61 qS4 = 7.70381505559019352791e-02;
98 double z,p,q,r,w,s,c,df;
105 if(((ix-0x3ff00000)|lx)==0) {
125 return pi - 2.0*(s+w);
131 c = (z-df*df)/(s+df);
double sqrt(double x)
Square root function.
#define GET_HIGH_WORD(i, d)
Get the more significant 32 bit int from a double.
static const double pio2_hi
#define GET_LOW_WORD(i, d)
Get the less significant 32 bit int from a double.
signed int sword
32 bit signed integer.
#define SET_LOW_WORD(d, v)
Set the less significant 32 bits of a double from an int.
double acos(double x)
Inverse trigonometric cosine function.
static const double pio2_lo