|
static const static double double | bp [] = {1.0, 1.5,} |
|
static const static double double | dp_h [] = { 0.0, 5.84962487220764160156e-01,} |
|
static const static double double | dp_l [] = { 0.0, 1.35003920212974897128e-08,} |
|
static const static double double | zero = 0.0 |
|
static const static double double | one = 1.0 |
|
static const static double double | two = 2.0 |
|
static const static double double | two53 = 9007199254740992.0 |
|
static const static double double | huge = 1.0e300 |
|
static const static double double | tiny = 1.0e-300 |
|
static const static double double | L1 = 5.99999999999994648725e-01 |
|
static const static double double | L2 = 4.28571428578550184252e-01 |
|
static const static double double | L3 = 3.33333329818377432918e-01 |
|
static const static double double | L4 = 2.72728123808534006489e-01 |
|
static const static double double | L5 = 2.30660745775561754067e-01 |
|
static const static double double | L6 = 2.06975017800338417784e-01 |
|
static const static double double | P1 = 1.66666666666666019037e-01 |
|
static const static double double | P2 = -2.77777777770155933842e-03 |
|
static const static double double | P3 = 6.61375632143793436117e-05 |
|
static const static double double | P4 = -1.65339022054652515390e-06 |
|
static const static double double | P5 = 4.13813679705723846039e-08 |
|
static const static double double | lg2 = 6.93147180559945286227e-01 |
|
static const static double double | lg2_h = 6.93147182464599609375e-01 |
|
static const static double double | lg2_l = -1.90465429995776804525e-09 |
|
static const static double double | ovt = 8.0085662595372944372e-0017 |
|
static const static double double | cp = 9.61796693925975554329e-01 |
|
static const static double double | cp_h = 9.61796700954437255859e-01 |
|
static const static double double | cp_l = -7.02846165095275826516e-09 |
|
static const static double double | ivln2 = 1.44269504088896338700e+00 |
|
static const static double double | ivln2_h = 1.44269502162933349609e+00 |
|
static const static double double | ivln2_l = 1.92596299112661746887e-08 |
|
double y double | x |
|
double y double | y |
|
double | y1 |
|
double | t1 = (((z_h + z_l) + dp_h[k]) + t) |
|
double | t2 = z_l - (((t1 - t) - dp_h[k]) - z_h) |
|
double | r = s2 * s2 * (L1 + s2 * (L2 + s2 * (L3 + s2 * (L4 + s2 * (L5 + s2 * L6))))) |
|
double | s = u * v |
|
double | t = (double)n |
|
double | u = ax - bp[k] |
|
double | v = one / (ax + bp[k]) |
|
double | w = v - (z - u) |
|
double | qqq = ax |
|
int | i0 = ((*(int*)&one) >> 29) ^ 1 |
|
int | i1 = 1 - i0 |
|
int | i = j & 0x7fffffff |
|
int | j = ix & 0x000fffff |
|
int | k = (i >> 20) - 0x3ff |
|
int | yisint |
|
int | n = 0 |
|
int | hx = __HI(x) |
|
int | hy = __HI(y) |
|
int | ix = hx & 0x7fffffff |
|
int | iy = hy & 0x7fffffff |
|
u32 | lx = __LO(x) |
|
u32 | ly = __LO(y) |
|
| ax = __fabs(x) |
|
| else |
|
| s_h = s |
|
| t_h = zero |
|
| t_l = ax - (t_h - bp[k]) |
|
| s_l = v * ((u - s_h * t_h) - s_h * t_l) |
|
| s2 = s * s |
|
| p_h = u + v |
|
| p_l = v - (p_h - u) |
|
| z_h = cp_h * p_h |
|
| z_l = cp_l * p_h + p_l * cp + dp_l[k] |
|
| z = u + v |
|