| /src/lib/libm/noieee_src/ |
| n_atanh.c | 33 static char sccsid[] = "@(#)atanh.c 8.1 (Berkeley) 6/4/93";
37 /* ATANH(X)
49 * atanh(x) = --- * log(1 + -------) = 0.5 * log1p(2 * --------)
53 * atanh(x) is NaN if |x| > 1 with signal;
54 * atanh(NaN) is that NaN with no signal;
55 * atanh(+-1) is +-INF with signal.
58 * atanh(x) returns the exact hyperbolic arc tangent of x nearly rounded.
70 atanh(double x) function in typeref:typename:double
|
| /src/lib/libm/src/ |
| w_atanh.c | 19 * wrapper atanh(x)
27 atanh(double x) /* wrapper atanh */ function in typeref:typename:double
38 return __kernel_standard(x,x,30); /* atanh(|x|>1) */
40 return __kernel_standard(x,x,31); /* atanh(|x|==1) */
|
| e_atanhl.c | 35 /* EXP_TINY is the threshold below which we use atanh(x) ~= x. */
79 return atanh(x);
|
| /src/tests/lib/lua/libm/ |
| h_lualibm.c | 35 TEST(atanh(tanh(M_SQRT2)));
|
| lualibm.lua | 41 test("atanh(tanh(M_SQRT2))", lm.atanh(lm.tanh(lm.M_SQRT2)))
|
| /src/include/ |
| tgmath.h | 136 #define atanh(a) __TG_COMPLEX((a), atanh) macro
|
| math.h | 294 double atanh(double);
|
| /src/lib/lua/libm/ |
| libm.c | 112 DFUNC_DBL(atanh)
248 { "atanh", libm_atanh },
|
| /src/lib/libm/complex/ |
| catrig.c | 91 * The functions catan(h) are a little under 2 times slower than atanh.
601 return (CMPLX(atanh(x), y));
|
| /src/lib/libm/ |
| Makefile | 446 MAN+= acos.3 acosh.3 asin.3 asinh.3 atan.3 atan2.3 atanh.3 \
475 MLINKS+=atanh.3 atanhf.3
|
| /src/sys/arch/m68k/060sp/dist/ |
| fplsp.s | 8585 # ATANH #
8588 # 2. (|X| < 1) Calculate atanh(X) by #
8592 # atanh(X) := sgn * (1/2) * logp1(z) #
8617 #--Y = |X|, Z = 2Y/(1-Y), ATANH(X) = SIGN(X) * (1/2) * LOG1P(Z).
8650 #--ATANH(X) = X FOR DENORMALIZED X
|
| fpsp.s | 8691 # ATANH #
8694 # 2. (|X| < 1) Calculate atanh(X) by #
8698 # atanh(X) := sgn * (1/2) * logp1(z) #
8723 #--Y = |X|, Z = 2Y/(1-Y), ATANH(X) = SIGN(X) * (1/2) * LOG1P(Z).
8756 #--ATANH(X) = X FOR DENORMALIZED X
|
