| /sysdeps/ieee754/dbl-64/ |
| A D | s_tanh.c | 47 static const double one = 1.0, two = 2.0, tiny = 1.0e-300; variable
63 return one / x + one; /* tanh(+-inf)=+-1 */ in __tanh()
65 return one / x - one; /* tanh(NaN) = NaN */ in __tanh()
76 return x * (one + x); /* tanh(small) = small */ in __tanh()
81 z = one - two / (t + two); in __tanh()
92 z = one - tiny; /* raised inexact flag */ in __tanh()
|
| A D | s_asinh.c | 31 one = 1.00000000000000000000e+00, /* 0x3FF00000, 0x00000000 */ variable
45 if (huge + x > one) in __asinh()
59 w = __ieee754_log (2.0 * xa + one / (sqrt (xa * xa + one) + in __asinh()
65 w = __log1p (xa + t / (one + sqrt (one + t))); in __asinh()
|
| A D | e_acosh.c | 31 one = 1.0, variable
54 return __ieee754_log (2.0 * x - one / (x + sqrt (t - one))); in __ieee754_acosh()
59 double t = x - one; in __ieee754_acosh()
|
| /sysdeps/ieee754/flt-32/ |
| A D | s_tanhf.c | 25 static const float one=1.0, two=2.0, tiny = 1.0e-30; variable
37 if (jx>=0) return one/x+one; /* tanh(+-inf)=+-1 */ in __tanhf()
38 else return one/x-one; /* tanh(NaN) = NaN */ in __tanhf()
48 return x*(one+x); /* tanh(small) = small */ in __tanhf()
52 z = one - two/(t+two); in __tanhf()
59 z = one - tiny; /* raised inexact flag */ in __tanhf()
|
| A D | s_asinhf.c | 22 one = 1.0000000000e+00, /* 0x3F800000 */ variable
35 if(huge+x>one) return x; /* return x inexact except 0 */ in __asinhf()
43 w = __ieee754_logf(2.0f*xa+one/(sqrtf(xa*xa+one)+xa)); in __asinhf()
46 w =__log1pf(xa+t/(one+sqrtf(one+t))); in __asinhf()
|
| A D | s_erff.c | 31 one = 1.0000000000e+00, /* 0x3F800000 */ variable
131 s = fabsf(x)-one; in __erff()
137 if(hx>=0) return one-tiny; else return tiny-one; in __erff()
140 s = one/(x*x); in __erff()
155 if(hx>=0) return one-r/x; else return r/x-one; in __erff()
175 return one-x; in libm_alias_float()
181 return one-(x+x*y); in libm_alias_float()
189 s = fabsf(x)-one; in libm_alias_float()
193 z = one-erx; return z - P/Q; in libm_alias_float()
195 z = erx+P/Q; return one+z; in libm_alias_float()
[all …]
|
| A D | e_acoshf.c | 24 one = 1.0, variable
43 return __ieee754_logf((float)2.0*x-one/(x+sqrtf(t-one))); in __ieee754_acoshf()
45 t = x-one; in __ieee754_acoshf()
|
| A D | s_atanf.c | 54 one = 1.0, variable
72 if(huge+x>one) return x; /* raise inexact */ in __atanf()
79 id = 0; x = ((float)2.0*x-one)/((float)2.0+x); in __atanf()
81 id = 1; x = (x-one)/(x+one); in __atanf()
85 id = 2; x = (x-(float)1.5)/(one+(float)1.5*x); in __atanf()
|
| A D | e_coshf.c | 21 static const float one = 1.0, half=0.5; variable
36 if (ix<0x24000000) return one; /* cosh(tiny) = 1 */ in __ieee754_coshf()
38 w = one+t; in __ieee754_coshf()
39 return one+(t*t)/(w+w); in __ieee754_coshf()
|
| /sysdeps/ieee754/ldbl-96/ |
| A D | s_tanhl.c | 49 static const long double one=1.0, two=2.0, tiny = 1.0e-4900L; variable
64 if (se&0x8000) return one/x-one; /* tanhl(-inf)= -1; */ in __tanhl()
65 else return one/x+one; /* tanhl(+inf)=+1 */ in __tanhl()
75 return x*(one+tiny); /* tanh(small) = small */ in __tanhl()
79 z = one - two/(t+two); in __tanhl()
86 z = one - tiny; /* raised inexact flag */ in __tanhl()
|
| A D | s_asinhl.c | 37 one = 1.000000000000000000000e+00L, /* 0x3FFF, 0x00000000, 0x00000000 */ variable
49 if(huge+x>one) return x; /* return x inexact except 0 */ in __asinhl()
57 w = __ieee754_logl(2.0*xa+one/(sqrtl(xa*xa+one)+xa)); in __asinhl()
60 w =__log1pl(xa+t/(one+sqrtl(one+t))); in __asinhl()
|
| A D | e_acoshl.c | 34 one = 1.0, variable
54 return __ieee754_logl(2.0*x-one/(x+sqrtl(t-one))); in __ieee754_acoshl()
56 t = x-one; in __ieee754_acoshl()
|
| /sysdeps/ieee754/ldbl-128/ |
| A D | s_tanhl.c | 45 static const _Float128 one = 1.0, two = 2.0, tiny = L(1.0e-4900); variable
63 return one / x - one; /* tanhl(-inf)= -1; */ in __tanhl()
65 return one / x + one; /* tanhl(+inf)=+1 */ in __tanhl()
76 return x * (one + tiny); /* tanh(small) = small */ in __tanhl()
82 z = one - two / (t + two); in __tanhl()
93 z = one - tiny; /* raised inexact flag */ in __tanhl()
|
| A D | s_asinhl.c | 37 one = 1, variable
56 if (huge + x > one) in __asinhl()
67 w = __ieee754_logl (2.0 * t + one / (sqrtl (x * x + one) + t)); in __asinhl()
72 w = __log1pl (u.value + t / (one + sqrtl (one + t))); in __asinhl()
|
| A D | e_acoshl.c | 34 one = 1.0, variable
55 return __ieee754_logl(2*x-one/(x+sqrtl(t-one))); in __ieee754_acoshl()
57 t = x-one; in __ieee754_acoshl()
|
| /sysdeps/ieee754/ldbl-128ibm/ |
| A D | s_tanhl.c | 47 static const long double one=1.0L, two=2.0L, tiny = 1.0e-300L; variable
62 if (jx>=0) return one/x+one; /* tanh(+-inf)=+-1 */ in __tanhl()
63 else return one/x-one; /* tanh(NaN) = NaN */ in __tanhl()
77 z = one - two/(t+two); in __tanhl()
84 z = one - tiny; /* raised inexact flag */ in __tanhl()
|
| A D | s_asinhl.c | 35 one = 1.00000000000000000000e+00L, /* 0x3ff0000000000000, 0 */ variable
51 if(huge+x>one) return x; /* return x inexact except 0 */ in __asinhl()
57 w = __ieee754_logl(2.0*t+one/(sqrtl(x*x+one)+t)); in __asinhl()
60 w =__log1pl(fabsl(x)+t/(one+sqrtl(one+t))); in __asinhl()
|
| A D | e_atanhl.c | 37 static const long double one = 1.0L, huge = 1e300L; variable
55 if (t > one) in __ieee754_atanhl()
57 if (t == one) in __ieee754_atanhl()
68 t = 0.5*__log1pl(t+t*x/(one-x)); in __ieee754_atanhl()
70 t = 0.5*__log1pl((x+x)/(one-x)); in __ieee754_atanhl()
|
| A D | e_acoshl.c | 32 one = 1.0L, variable
57 return __ieee754_logl(2.0*x-one/(x+sqrtl(t-one))); in __ieee754_acoshl()
59 t = x-one; in __ieee754_acoshl()
|
| /sysdeps/i386/fpu/ |
| A D | e_acosh.S | 25 .type one,@object
26 one: .double 1.0 label
27 ASM_SIZE_DIRECTIVE(one)
54 fsubl MO(one) // x-1 : log(2)
69 2: faddl MO(one) // x+sqrt(2*(x-1)+(x-1)^2) : log(2)
86 fsubl MO(one) // x^2-1 : x : 2*x : log(2)
89 fdivrl MO(one) // 1/(x+sqrt(x^2-1)) : 2*x : log(2)
|
| A D | e_acoshf.S | 25 .type one,@object
26 one: .double 1.0 label
27 ASM_SIZE_DIRECTIVE(one)
54 fsubl MO(one) // x-1 : log(2)
69 2: faddl MO(one) // x+sqrt(2*(x-1)+(x-1)^2) : log(2)
86 fsubl MO(one) // x^2-1 : x : 2*x : log(2)
89 fdivrl MO(one) // 1/(x+sqrt(x^2-1)) : 2*x : log(2)
|
| A D | e_acoshl.S | 28 .type one,@object
29 one: .double 1.0 label
30 ASM_SIZE_DIRECTIVE(one)
61 fsubl MO(one) // x-1 : log(2)
76 2: faddl MO(one) // x+sqrt(2*(x-1)+(x-1)^2) : log(2)
93 fsubl MO(one) // x^2-1 : x : 2*x : log(2)
96 fdivrl MO(one) // 1/(x+sqrt(x^2-1)) : 2*x : log(2)
|
| A D | e_atanh.S | 29 .type one,@object
30 one: .double 1.0 label
31 ASM_SIZE_DIRECTIVE(one)
73 fsubrl MO(one) // 1-|x| : |x| : 2*|x| : 0.5*ln2
89 4: faddl MO(one) // 1+2*|x|+(2*|x|^2)/(1-|x|) : 0.5*ln2
96 2: faddl MO(one) // 1+|x| : |x| : 0.5*ln2
98 fsubrl MO(one) // 1-|x| : 1+|x| : 0.5*ln2
|
| A D | e_atanhf.S | 29 .type one,@object
30 one: .double 1.0 label
31 ASM_SIZE_DIRECTIVE(one)
73 fsubrl MO(one) // 1-|x| : |x| : 2*|x| : 0.5*ln2
89 4: faddl MO(one) // 1+2*|x|+(2*|x|^2)/(1-|x|) : 0.5*ln2
96 2: faddl MO(one) // 1+|x| : |x| : 0.5*ln2
98 fsubrl MO(one) // 1-|x| : 1+|x| : 0.5*ln2
|
| A D | e_atanhl.S | 31 .type one,@object
32 one: .double 1.0 label
33 ASM_SIZE_DIRECTIVE(one)
87 fsubrl MO(one) // 1-|x| : |x| : 2*|x| : 0.5*ln2
102 4: faddl MO(one) // 1+2*|x|+(2*|x|^2)/(1-|x|) : 0.5*ln2
109 2: faddl MO(one) // 1+|x| : |x| : 0.5*ln2
111 fsubrl MO(one) // 1-|x| : 1+|x| : 0.5*ln2
|