| /src/lib/libm/noieee_src/ |
| n_atan.c | 36 static char sccsid[] = "@(#)atan.c 8.1 (Berkeley) 6/4/93";
40 /* ATAN(X)
49 * atan(x) = atan2(x,1.0).
57 * atan(x) returns (PI/pi) * (the exact arc tangent of x) nearly rounded;
73 * 0.86 ulps. (comparing against (PI/pi)*(exact atan(x))).
77 * atan(x) returns the exact atan(x) with error below about 2 ulps.
88 __weak_alias(atan, _atan)
92 atan(double x)
|
| /src/tests/lib/libm/ |
| t_atan.c | 56 * atan(3)
58 ATF_LIBM_TEST(atan_nan, "Test atan/atanf(NaN) == NaN")
61 T_LIBM_CHECK_NAN(0, atan, T_LIBM_NAN);
68 ATF_LIBM_TEST(atan_inrange, "Test atan/atanf(x) for some values")
73 T_LIBM_CHECK(i, atan, values[i].x, values[i].y, 1.0e-15);
78 ATF_LIBM_TEST(atan_zero_neg, "Test atan/atanf(-0.0) == -0.0")
81 T_LIBM_CHECK_MINUS_ZERO(0, atan, -0.0);
85 ATF_LIBM_TEST(atan_zero_pos, "Test atan/atanf(+0.0) == +0.0")
88 T_LIBM_CHECK_PLUS_ZERO(0, atan, +0.0);
|
| /src/lib/libm/arch/i387/ |
| s_atan.S | 14 WEAK_ALIAS(atan, _atan)
|
| /src/lib/libm/arch/mc68881/ |
| s_atan.S | 39 ;.asciz "from: @(#)atan.s 5.1 (Berkeley) 5/17/90"
43 WEAK_ALIAS(atan, _atan)
|
| /src/lib/libm/arch/m68060/ |
| s_atan.S | 4 * FPLSP wrapper for atan
12 WEAK_ALIAS(atan, _atan)
|
| makeas.sh | 193 mk _atan atan 0038 s_atan
|
| /src/lib/libm/src/ |
| e_atan2.c | 70 if(hx==0x3ff00000&&lx==0) return atan(y); /* x=1.0 */
77 case 1: return y; /* atan(+-0,+anything)=+-0 */
78 case 2: return pi+tiny;/* atan(+0,-anything) = pi */
79 case 3: return -pi-tiny;/* atan(-0,-anything) =-pi */
89 case 0: return pi_o_4+tiny;/* atan(+INF,+INF) */
90 case 1: return -pi_o_4-tiny;/* atan(-INF,+INF) */
91 case 2: return 3.0*pi_o_4+tiny;/*atan(+INF,-INF)*/
92 case 3: return -3.0*pi_o_4-tiny;/*atan(-INF,-INF)*/
96 case 0: return zero ; /* atan(+...,+INF) */
97 case 1: return -zero ; /* atan(-...,+INF) *
[all...] |
| s_atan.c | 20 /* atan(x)
22 * 1. Reduce x to positive by atan(x) = -atan(-x).
27 * [0,7/16] atan(x) = t-t^3*(a1+t^2*(a2+...(a10+t^2*a11)...)
28 * [7/16,11/16] atan(x) = atan(1/2) + atan( (t-0.5)/(1+t/2) )
29 * [11/16.19/16] atan(x) = atan( 1 ) + atan( (t-1)/(1+t)
85 atan(double x) function in typeref:typename:double
[all...] |
| namespace.h | 11 #define atan _atan macro
|
| /src/tests/lib/lua/libm/ |
| h_lualibm.c | 33 TEST(atan(tan(M_SQRT2)));
|
| lualibm.lua | 39 test("atan(tan(M_SQRT2))", lm.atan(lm.tan(lm.M_SQRT2)))
|
| /src/include/ |
| tgmath.h | 133 #define atan(a) __TG_COMPLEX((a), atan) macro
|
| math.h | 240 double atan(double);
|
| /src/lib/lua/libm/ |
| libm.c | 111 DFUNC_DBL(atan)
247 { "atan", libm_atan },
|
| /src/usr.bin/xlint/llib/ |
| llib-lstdc | 98 double (atan)(double x);
|
| llib-lposix | 74 double (atan)(double x);
|
| /src/lib/libm/complex/ |
| catrig.c | 603 /* To ensure the same accuracy as atan(), and to filter out z = 0. */
605 return (CMPLX(x, atan(y)));
|
| /src/lib/libm/ |
| Makefile | 446 MAN+= acos.3 acosh.3 asin.3 asinh.3 atan.3 atan2.3 atanh.3 \
473 MLINKS+=atan.3 atanf.3
|
| /src/sys/arch/m68k/060sp/dist/ |
| fplsp.s | 6249 #--ENTRY POINT FOR ATAN(X), HERE X IS FINITE, NON-ZERO, AND NOT NAN'S
6268 #--THE IDEA IS ATAN(X) = ATAN(F) + ATAN( [X-F] / [1+XF] ).
6269 #--SO IF F IS CHOSEN TO BE CLOSE TO X AND ATAN(F) IS STORED IN
6270 #--A TABLE, ALL WE NEED IS TO APPROXIMATE ATAN(U) WHERE
6273 #--ATAN(U) IS A VERY SHORT POLYNOMIAL AND THE INDEXING TO
6277 #--ATAN(X) DIRECTLY WILL NEED TO USE A RATIONAL APPROXIMATION
6285 #--ARE ONLY 8 TIMES 16 = 2^7 = 128 |F|'S. SINCE ATAN(-|F|) IS
6286 #-- -ATAN(|F|), WE NEED TO STORE ONLY ATAN(|F|)
[all...] |
| fpsp.s | 6355 #--ENTRY POINT FOR ATAN(X), HERE X IS FINITE, NON-ZERO, AND NOT NAN'S
6374 #--THE IDEA IS ATAN(X) = ATAN(F) + ATAN( [X-F] / [1+XF] ).
6375 #--SO IF F IS CHOSEN TO BE CLOSE TO X AND ATAN(F) IS STORED IN
6376 #--A TABLE, ALL WE NEED IS TO APPROXIMATE ATAN(U) WHERE
6379 #--ATAN(U) IS A VERY SHORT POLYNOMIAL AND THE INDEXING TO
6383 #--ATAN(X) DIRECTLY WILL NEED TO USE A RATIONAL APPROXIMATION
6391 #--ARE ONLY 8 TIMES 16 = 2^7 = 128 |F|'S. SINCE ATAN(-|F|) IS
6392 #-- -ATAN(|F|), WE NEED TO STORE ONLY ATAN(|F|)
[all...] |
