29
29
* := signl(x)*log1pl(|x| + x^2/(1 + sqrtl(1+x^2)))
40
36
one = 1.000000000000000000000e+00L, /* 0x3FFF, 0x00000000, 0x00000000 */
41
37
ln2 = 6.931471805599453094287e-01L, /* 0x3FFE, 0xB17217F7, 0xD1CF79AC */
42
38
huge= 1.000000000000000000e+4900L;