Lines Matching defs:atan
1097 /* atan(x)
1099 * 1. Reduce x to positive by atan(x) = -atan(-x).
1104 * [0,7/16] atan(x) = t-t^3*(a1+t^2*(a2+...(a10+t^2*a11)...)
1105 * [7/16,11/16] atan(x) = atan(1/2) + atan( (t-0.5)/(1+t/2) )
1106 * [11/16.19/16] atan(x) = atan( 1 ) + atan( (t-1)/(1+t) )
1107 * [19/16,39/16] atan(x) = atan(3/2) + atan( (t-1.5)/(1+1.5t) )
1108 * [39/16,INF] atan(x) = atan(INF) + atan( -1/t )
1116 double atan(double x) {
1118 4.63647609000806093515e-01, /* atan(0.5)hi 0x3FDDAC67, 0x0561BB4F */
1119 7.85398163397448278999e-01, /* atan(1.0)hi 0x3FE921FB, 0x54442D18 */
1120 9.82793723247329054082e-01, /* atan(1.5)hi 0x3FEF730B, 0xD281F69B */
1121 1.57079632679489655800e+00, /* atan(inf)hi 0x3FF921FB, 0x54442D18 */
1125 2.26987774529616870924e-17, /* atan(0.5)lo 0x3C7A2B7F, 0x222F65E2 */
1126 3.06161699786838301793e-17, /* atan(1.0)lo 0x3C81A626, 0x33145C07 */
1127 1.39033110312309984516e-17, /* atan(1.5)lo 0x3C700788, 0x7AF0CBBD */
1128 6.12323399573676603587e-17, /* atan(inf)lo 0x3C91A626, 0x33145C07 */
1251 return atan(y); /* x=1.0 */
1260 return y; /* atan(+-0,+anything)=+-0 */
1262 return pi + tiny; /* atan(+0,-anything) = pi */
1264 return -pi - tiny; /* atan(-0,-anything) =-pi */
1275 return pi_o_4 + tiny; /* atan(+INF,+INF) */
1277 return -pi_o_4 - tiny; /* atan(-INF,+INF) */
1279 return 3.0 * pi_o_4 + tiny; /*atan(+INF,-INF)*/
1281 return -3.0 * pi_o_4 - tiny; /*atan(-INF,-INF)*/
1286 return zero; /* atan(+...,+INF) */
1288 return -zero; /* atan(-...,+INF) */
1290 return pi + tiny; /* atan(+...,-INF) */
1292 return -pi - tiny; /* atan(-...,-INF) */
1307 z = atan(fabs(y / x)); /* safe to do y/x */
1311 return z; /* atan(+,+) */
1313 return -z; /* atan(-,+) */
1315 return pi - (z - pi_lo); /* atan(+,-) */
1317 return (z - pi_lo) - pi; /* atan(-,-) */