version 1.10, 1999/07/02 15:37:42 |
version 1.11, 2002/05/26 22:01:54 |
Line 38 __RCSID("$NetBSD$"); |
|
Line 38 __RCSID("$NetBSD$"); |
|
#include "math.h" |
#include "math.h" |
#include "math_private.h" |
#include "math_private.h" |
|
|
#ifdef __STDC__ |
|
static const double atanhi[] = { |
static const double atanhi[] = { |
#else |
|
static double atanhi[] = { |
|
#endif |
|
4.63647609000806093515e-01, /* atan(0.5)hi 0x3FDDAC67, 0x0561BB4F */ |
4.63647609000806093515e-01, /* atan(0.5)hi 0x3FDDAC67, 0x0561BB4F */ |
7.85398163397448278999e-01, /* atan(1.0)hi 0x3FE921FB, 0x54442D18 */ |
7.85398163397448278999e-01, /* atan(1.0)hi 0x3FE921FB, 0x54442D18 */ |
9.82793723247329054082e-01, /* atan(1.5)hi 0x3FEF730B, 0xD281F69B */ |
9.82793723247329054082e-01, /* atan(1.5)hi 0x3FEF730B, 0xD281F69B */ |
1.57079632679489655800e+00, /* atan(inf)hi 0x3FF921FB, 0x54442D18 */ |
1.57079632679489655800e+00, /* atan(inf)hi 0x3FF921FB, 0x54442D18 */ |
}; |
}; |
|
|
#ifdef __STDC__ |
|
static const double atanlo[] = { |
static const double atanlo[] = { |
#else |
|
static double atanlo[] = { |
|
#endif |
|
2.26987774529616870924e-17, /* atan(0.5)lo 0x3C7A2B7F, 0x222F65E2 */ |
2.26987774529616870924e-17, /* atan(0.5)lo 0x3C7A2B7F, 0x222F65E2 */ |
3.06161699786838301793e-17, /* atan(1.0)lo 0x3C81A626, 0x33145C07 */ |
3.06161699786838301793e-17, /* atan(1.0)lo 0x3C81A626, 0x33145C07 */ |
1.39033110312309984516e-17, /* atan(1.5)lo 0x3C700788, 0x7AF0CBBD */ |
1.39033110312309984516e-17, /* atan(1.5)lo 0x3C700788, 0x7AF0CBBD */ |
6.12323399573676603587e-17, /* atan(inf)lo 0x3C91A626, 0x33145C07 */ |
6.12323399573676603587e-17, /* atan(inf)lo 0x3C91A626, 0x33145C07 */ |
}; |
}; |
|
|
#ifdef __STDC__ |
|
static const double aT[] = { |
static const double aT[] = { |
#else |
|
static double aT[] = { |
|
#endif |
|
3.33333333333329318027e-01, /* 0x3FD55555, 0x5555550D */ |
3.33333333333329318027e-01, /* 0x3FD55555, 0x5555550D */ |
-1.99999999998764832476e-01, /* 0xBFC99999, 0x9998EBC4 */ |
-1.99999999998764832476e-01, /* 0xBFC99999, 0x9998EBC4 */ |
1.42857142725034663711e-01, /* 0x3FC24924, 0x920083FF */ |
1.42857142725034663711e-01, /* 0x3FC24924, 0x920083FF */ |
Line 78 static double aT[] = { |
|
Line 66 static double aT[] = { |
|
1.62858201153657823623e-02, /* 0x3F90AD3A, 0xE322DA11 */ |
1.62858201153657823623e-02, /* 0x3F90AD3A, 0xE322DA11 */ |
}; |
}; |
|
|
#ifdef __STDC__ |
|
static const double |
static const double |
#else |
|
static double |
|
#endif |
|
one = 1.0, |
one = 1.0, |
huge = 1.0e300; |
huge = 1.0e300; |
|
|
#ifdef __STDC__ |
double |
double atan(double x) |
atan(double x) |
#else |
|
double atan(x) |
|
double x; |
|
#endif |
|
{ |
{ |
double w,s1,s2,z; |
double w,s1,s2,z; |
int32_t ix,hx,id; |
int32_t ix,hx,id; |