| /picolibc-3.7.0-3.6.0/newlib/libm/test/ |
| D | string.c | 76 static char one[100]; variable
96 check(strcpy(one, "abcd") == one); /* Returned value. */ in test_string()
97 equal(one, "abcd"); /* Basic test. */ in test_string()
99 (void) strcpy(one, "x"); in test_string()
100 equal(one, "x"); /* Writeover. */ in test_string()
101 equal(one+2, "cd"); /* Wrote too much? */ in test_string()
104 (void) strcpy(one, two); in test_string()
105 equal(one, "hi there"); /* Basic test encore. */ in test_string()
108 (void) strcpy(one, ""); in test_string()
109 equal(one, ""); /* Boundary condition. */ in test_string()
[all …]
|
| /picolibc-3.7.0-3.6.0/newlib/libm/math/ |
| D | sf_tanh.c | 18 static const float one = 1.0, two = 2.0; variable
32 return one / x + one; /* tanh(+-inf)=+-1 */ in tanhf()
34 return one / x - one; /* tanh(NaN) = NaN */ in tanhf()
40 return x * (one + x); /* tanh(small) = small */ in tanhf()
43 z = one - two / (t + two); in tanhf()
50 z = __math_inexactf(one); in tanhf()
|
| D | s_tanh.c | 75 static const __float64 one = _F_64(1.0), two = _F_64(2.0); variable
90 return one / x + one; /* tanh(+-inf)=+-1 */ in tanh64()
92 return one / x - one; /* tanh(NaN) = NaN */ in tanh64()
98 return x * (one + x); /* tanh(small) = small */ in tanh64()
101 z = one - two / (t + two); in tanh64()
108 z = __math_inexact64(one); in tanh64()
|
| D | sf_erf.c | 24 one = 1.0000000000e+00, /* 0x3F800000 */ variable
105 return (float)(1 - i) + one / x; /* erf(+-inf)=+-1 */ in erff()
117 s = one + z * (qq1 + z * (qq2 + z * (qq3 + z * (qq4 + z * qq5)))); in erff()
122 s = fabsf(x) - one; in erff()
125 Q = one + in erff()
134 return one - tiny; in erff()
136 return tiny - one; in erff()
139 s = one / (x * x); in erff()
145 S = one + in erff()
154 S = one + in erff()
[all …]
|
| D | s_erf.c | 160 one = _F_64(1.00000000000000000000e+00), /* 0x3FF00000, 0x00000000 */ variable
241 return (__float64)(1 - i) + one / x; /* erf(+-inf)=+-1 */ in erf64()
252 s = one + z * (qq1 + z * (qq2 + z * (qq3 + z * (qq4 + z * qq5)))); in erf64()
257 s = fabs64(x) - one; in erf64()
260 Q = one + in erf64()
269 return one - tiny; in erf64()
271 return tiny - one; in erf64()
274 s = one / (x * x); in erf64()
280 S = one + in erf64()
289 S = one + in erf64()
[all …]
|
| D | sf_asinh.c | 18 static const float one = 1.0000000000e+00, /* 0x3F800000 */ variable
32 if (huge + x > one) in asinhf()
39 w = logf((float)2.0 * t + one / (sqrtf(x * x + one) + t)); in asinhf()
42 w = log1pf(fabsf(x) + t / (one + sqrtf(one + t))); in asinhf()
|
| D | s_asinh.c | 64 one = _F_64(1.00000000000000000000e+00), /* 0x3FF00000, 0x00000000 */ variable
78 if (huge + x > one) in asinh64()
85 w = log64(_F_64(2.0) * t + one / (sqrt64(x * x + one) + t)); in asinh64()
88 w = log1p64(fabs64(x) + t / (one + sqrt64(one + t))); in asinh64()
|
| D | sf_atan.c | 47 static const float one = 1.0, huge = 1.0e30; variable
67 if (huge + x > one) in atanf()
76 x = ((float)2.0 * x - one) / ((float)2.0 + x); in atanf()
79 x = (x - one) / (x + one); in atanf()
84 x = (x - (float)1.5) / (one + (float)1.5 * x); in atanf()
|
| D | sf_j0.c | 20 static const float huge = 1e30, one = 1.0, variable
76 if (huge + x > one) { /* raise inexact if x != 0 */ in j0f()
78 return one; /* |x|<2**-27 */ in j0f()
80 return one - (float)0.25 * x * x; in j0f()
85 s = one + z * (S01 + z * (S02 + z * (S03 + z * S04))); in j0f()
87 return one + z * ((float)-0.25 + (r / s)); in j0f()
90 return ((one + u) * (one - u) + z * (r / s)); in j0f()
169 v = one + z * (v01 + z * (v02 + z * (v03 + z * v04))); in y0f()
270 z = one / (x * x); in pzerof()
272 s = one + z * (q[0] + z * (q[1] + z * (q[2] + z * (q[3] + z * q[4])))); in pzerof()
[all …]
|
| D | sf_acosh.c | 19 static const float one = 1.0, ln2 = 6.9314718246e-01; /* 0x3f317218 */ variable
38 return logf((float)2.0 * x - one / (x + sqrtf(t - one))); in acoshf()
40 t = x - one; in acoshf()
|
| D | s_acosh.c | 34 one = _F_64(1.0), variable
55 return log64(_F_64(2.0) * x - one / (x + sqrt64(t - one))); in acosh64()
57 t = x - one; in acosh64()
|
| D | s_atan.c | 100 static const __float64 one = _F_64(1.0), huge = _F_64(1.0e300); variable
122 if (huge + x > one) in atan64()
131 x = (_F_64(2.0) * x - one) / (_F_64(2.0) + x); in atan64()
134 x = (x - one) / (x + one); in atan64()
139 x = (x - _F_64(1.5)) / (one + 1.5 * x); in atan64()
|
| D | kf_cos.c | 18 static const float one = 1.0000000000e+00, /* 0x3f800000 */ variable
34 return one; in __kernel_cosf()
38 return one - ((float)0.5 * z - (z * r - x * y)); in __kernel_cosf()
46 a = one - qx; in __kernel_cosf()
|
| /picolibc-3.7.0-3.6.0/newlib/libm/ld/ld128/ |
| D | s_tanhl.c | 55 static const long double one = 1.0L, two = 2.0L, tiny = 1.0e-4900L; variable
73 return one / x - one; /* tanhl(-inf)= -1; */ in tanhl()
75 return one / x + one; /* tanhl(+inf)=+1 */ in tanhl()
84 return x * (one + tiny); /* tanh(small) = small */ in tanhl()
89 z = one - two / (t + two); in tanhl()
100 z = one - tiny; /* raised inexact flag */ in tanhl()
|
| D | s_asinhl.c | 27 one = 1.0L, variable
45 if (huge + x > one) in asinhl()
56 w = logl (2.0L * t + one / (sqrtl (x * x + one) + t)); in asinhl()
61 w = log1pl (u.value + t / (one + sqrtl (one + t))); in asinhl()
|
| D | e_acoshl.c | 30 one = 1.0L, variable
51 return logl(2.0L*x-one/(x+sqrtl(t-one))); in acoshl()
53 t = x-one; in acoshl()
|
| /picolibc-3.7.0-3.6.0/newlib/libm/ld/ld80/ |
| D | s_tanhl.c | 39 static const long double one=1.0L, two=2.0L, tiny = 1.0e-4900L; variable
55 if (se&0x8000) return one/x-one; /* tanhl(-inf)= -1; */ in tanhl()
56 else return one/x+one; /* tanhl(+inf)=+1 */ in tanhl()
64 return x*(one+tiny); /* tanh(small) = small */ in tanhl()
67 z = one - two/(t+two); in tanhl()
74 z = one - tiny; /* raised inexact flag */ in tanhl()
|
| D | s_asinhl.c | 27 one = 1.000000000000000000000e+00L, /* 0x3FFF, 0x00000000, 0x00000000 */ variable
40 if(huge+x>one) return x; /* return x inexact except 0 */ in asinhl()
46 w = logl(2.0l*t+one/(sqrtl(x*x+one)+t)); in asinhl()
49 w =log1pl(fabsl(x)+t/(one+sqrtl(one+t))); in asinhl()
|
| D | e_acoshl.c | 28 one = 1.0l, variable
48 return logl(2.0l*x-one/(x+sqrtl(t-one))); in acoshl()
50 t = x-one; in acoshl()
|
| D | s_erfl.c | 107 one = 1.0L, variable
259 return (long double) (1 - i) + one / x; /* erf(+-inf)=+-1 */ in erfl()
281 s = fabsl (x) - one; in erfl()
294 return one - tiny; in erfl()
296 return tiny - one; in erfl()
299 s = one / (x * x); in erfl()
321 return one - r / x; in erfl()
323 return r / x - one; in erfl()
338 return (long double) (((se & 0xffff) >> 15) << 1) + one / x; in erfcl()
345 return one - x; in erfcl()
[all …]
|
| /picolibc-3.7.0-3.6.0/newlib/libm/machine/spu/headers/ |
| D | recipf4.h | 80 vector float one = spu_splats(1.0f); in _recipf4() local
92 mant_a = spu_sel(a, one, exp_mask); in _recipf4()
101 x0 = spu_madd(spu_nmsub(mant_a, x0, one), x0, x0); in _recipf4()
104 err = spu_nmsub(mant_a, x1, one); in _recipf4()
118 exp = spu_add(spu_sub(spu_splats((unsigned int)0x7F000000), exp_a), spu_cmpabsgt(mant_a, one)); in _recipf4()
124 mult = spu_and(one, (vector float)spu_cmpgt((vector signed int)(exp), 0)); in _recipf4()
|
| D | divf4.h | 84 vector float one = spu_splats(1.0f); in _divf4() local
98 mant_a = spu_sel(a, one, exp_mask); in _divf4()
99 mant_b = spu_sel(b, one, exp_mask); in _divf4()
130 …exp = spu_add(spu_sub(spu_add(exp_a, (vector unsigned int)one), exp_b), spu_cmpabsgt(mant_b, man… in _divf4()
136 mult = spu_and(one, (vector float)spu_cmpgt((vector signed int)exp, 0)); in _divf4()
144 exp = spu_sel(exp, (vector unsigned int)one, overflow); in _divf4()
|
| /picolibc-3.7.0-3.6.0/newlib/libm/ld/common/ |
| D | s_atanl.c | 24 one = 1.0l, variable
51 if(huge+x>one) return x; /* raise inexact */ in atanl()
58 id = 0; x = (2.0l*x-one)/(2.0l+x); in atanl()
60 id = 1; x = (x-one)/(x+one); in atanl()
64 id = 2; x = (x-1.5l)/(one+1.5l*x); in atanl()
|
| /picolibc-3.7.0-3.6.0/newlib/libm/common/ |
| D | sf_expm1.c | 24 one = 1.0, variable
58 return tiny-one; /* return -1 */ in expm1f()
87 r1 = one+hxs*(Q1+hxs*(Q2+hxs*(Q3+hxs*(Q4+hxs*Q5)))); in expm1f()
97 else return one+2.0f*(x-e); in expm1f()
101 y = one-(e-x); in expm1f()
104 return y-one; in expm1f()
106 t = one; in expm1f()
117 y += one; in expm1f()
|
| D | s_expm1.c | 150 one = _F_64(1.0), variable
190 return tiny-one; /* return -1 */ in _NAME_64()
219 r1 = one+hxs*(Q1+hxs*(Q2+hxs*(Q3+hxs*(Q4+hxs*Q5)))); in _NAME_64()
229 else return one+_F_64(2.0)*(x-e); in _NAME_64()
233 y = one-(e-x); in _NAME_64()
236 return y-one; in _NAME_64()
238 t = one; in _NAME_64()
249 y += one; in _NAME_64()
|
