| /src/lib/libm/src/ |
| s_tanh.c | 45 static const double one=1.0, two=2.0, tiny = 1.0e-300; variable in typeref:typename:const double
76 z = one - tiny; /* raised inexact flag */
|
| s_tanhf.c | 24 static const float one=1.0, two=2.0, tiny = 1.0e-30; variable in typeref:typename:const float
54 z = one - tiny; /* raised inexact flag */
|
| e_atan2f.c | 25 tiny = 1.0e-30, variable in typeref:typename:const float
53 case 2: return pi+tiny;/* atan(+0,-anything) = pi */
54 case 3: return -pi-tiny;/* atan(-0,-anything) =-pi */
58 if(ix==0) return (hy<0)? -pi_o_2-tiny: pi_o_2+tiny;
64 case 0: return pi_o_4+tiny;/* atan(+INF,+INF) */
65 case 1: return -pi_o_4-tiny;/* atan(-INF,+INF) */
66 case 2: return (float)3.0*pi_o_4+tiny;/*atan(+INF,-INF)*/
67 case 3: return (float)-3.0*pi_o_4-tiny;/*atan(-INF,-INF)*/
73 case 2: return pi+tiny ; /* atan(+...,-INF) *
[all...] |
| e_sqrt.c | 75 * huge + tiny is equal to huge, and whether huge - tiny is
76 * equal to huge for some floating point number "huge" and "tiny".
91 static const double one = 1.0, tiny=1.0e-300; variable in typeref:typename:const double
171 z = one-tiny; /* trigger inexact flag */
173 z = one+tiny;
|
| e_sqrtf.c | 24 static const float one = 1.0, tiny=1.0e-30; variable in typeref:typename:const float
77 z = one-tiny; /* trigger inexact flag */
79 z = one+tiny;
|
| e_atan2.c | 49 tiny = 1.0e-300, variable in typeref:typename:const double
78 case 2: return pi+tiny;/* atan(+0,-anything) = pi */
79 case 3: return -pi-tiny;/* atan(-0,-anything) =-pi */
83 if((ix|lx)==0) return (hy<0)? -pi_o_2-tiny: pi_o_2+tiny;
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)*/
98 case 2: return pi+tiny ; /* atan(+...,-INF) *
[all...] |
| s_exp2.c | 52 static volatile long double tiny = 0x1p-16000L; variable in typeref:typename:volatile long double
55 static volatile double tiny = 0x1p-1000; variable in typeref:typename:volatile double
375 return (tiny * tiny); /* underflow */
|
| s_exp2f.c | 53 * This is normally done by calculating 'huge * huge' or 'tiny * tiny'.
67 static volatile float tiny = 0x1p-100; variable in typeref:typename:volatile float
69 #define underflow (tiny * tiny)
|
| s_expm1.c | 119 tiny = 1.0e-300, variable in typeref:typename:const double
159 if(x+tiny<0.0) /* raise inexact */
160 return tiny-one; /* return -1 */
|
| s_expm1f.c | 24 static const float huge = 1.0e+30, tiny = 1.0e-30; variable in typeref:typename:const float
64 if(x+tiny<(float)0.0) /* raise inexact */
65 return tiny-one; /* return -1 */
|
| b_tgamma.c | 132 static const double zero = 0., one = 1.0, tiny = 1e-300; variable in typeref:typename:const double
150 u.a = one - tiny; /* raise inexact */
298 return ((double)sgn*tiny*tiny);
|
| e_pow.c | 75 tiny = 1.0e-300, variable in typeref:typename:const double[][][]
194 if(ix<=0x3fefffff) return (hy<0)? huge*huge:tiny*tiny;
195 if(ix>=0x3ff00000) return (hy>0)? huge*huge:tiny*tiny;
198 if(ix<0x3fefffff) return (hy<0)? s*huge*huge:s*tiny*tiny;
199 if(ix>0x3ff00000) return (hy>0)? s*huge*huge:s*tiny*tiny;
200 /* now |1-x| is tiny <= 2**-20, suffice to comput
[all...] |
| e_powf.c | 34 tiny = 1.0e-30, variable in typeref:typename:const float[][][]
139 if(ix<0x3f7ffff8) return (hy<0)? sn*huge*huge:sn*tiny*tiny;
140 if(ix>0x3f800007) return (hy>0)? sn*huge*huge:sn*tiny*tiny;
141 /* now |1-x| is tiny <= 2**-20, suffice to compute
218 return sn*tiny*tiny; /* underflow */
220 if(p_l<=z-p_h) return sn*tiny*tiny; /* underflow *
[all...] |
| s_erf.c | 77 * = 2.0 - tiny (if x <= -6)
79 * erf(x) = sign(x)*(1.0 - tiny)
102 * erf(x) = sign(x) *(1 - tiny) (raise inexact)
103 * erfc(x) = tiny*tiny (raise underflow) if x > 0
104 * = 2 - tiny if x<0
117 tiny = 1e-300, variable in typeref:typename:const double
222 if(hx>=0) return one-tiny; else return tiny-one;
289 if(hx<0&&ix>=0x40180000) return two-tiny;/* x < -6 *
[all...] |
| s_erff.c | 25 tiny = 1e-30, variable in typeref:typename:const float
131 if(hx>=0) return one-tiny; else return tiny-one;
198 if(hx<0&&ix>=0x40c00000) return two-tiny;/* x < -6 */
210 if(hx>0) return tiny*tiny; else return two-tiny;
|
| /src/lib/libc/compat/gen/ |
| compat_ldexp_ieee754.c | 45 static volatile const double tiny = DBL_MIN, huge = DBL_MAX; variable in typeref:typename:volatile const double
52 return (val < 0 ? -tiny*tiny : tiny*tiny);
|
| /src/lib/libm/noieee_src/ |
| n_pow.c | 186 double huge = _HUGE, tiny = _TINY; local in function:pow_P
208 return(tiny*tiny);
|
| n_gamma.c | 122 static const double zero = 0., one = 1.0, tiny = _TINY; variable in typeref:typename:const double
314 return ((double)sgn*tiny*tiny);
|
| /src/lib/libm/complex/ |
| catrig.c | 54 #define raise_inexact() do { volatile float junk __unused = /*LINTED*/1 + tiny; } while (0)
84 tiny = 0x1p-100; variable in typeref:typename:const volatile float
|
| catrigf.c | 67 #define raise_inexact() do { volatile float junk __unused = /*LINTED*/1 + tiny; } while (0)
86 tiny = 0x1p-100; variable in typeref:typename:const volatile float
|
| catrigl.c | 61 #define raise_inexact() do { volatile float junk __unused = /*LINTED*/1 + tiny; } while (0)
121 tiny = 0x1p-100; variable in typeref:typename:const volatile float
|
| /src/lib/libm/ld128/ |
| e_powl.c | 90 tiny = 1.0e-3000L; variable in typeref:typename:const long double
272 return (hy < 0) ? huge * huge : tiny * tiny;
274 return (hy > 0) ? huge * huge : tiny * tiny;
278 return (hy < 0) ? huge * huge : tiny * tiny;
280 return (hy > 0) ? huge * huge : tiny * tiny;
397 return s * tiny * tiny; /* underflow *
[all...] |
| s_expl.c | 45 tiny = 0x1p-10000L; variable in typeref:typename:const volatile long double
78 RETURNF(tiny * tiny);
228 RETURNF(tiny - 1); /* good for x < -114ln2 - eps */
|
| /src/lib/libm/ld80/ |
| s_expl.c | 54 tiny = 0x1p-10000L; variable in typeref:typename:const volatile long double
89 RETURNF(tiny * tiny);
185 RETURNF(tiny - 1); /* good for x < -65ln2 - eps */
|
| /src/lib/libm/arch/vax/ |
| n_argred.S | 550 beql tiny
571 tiny: label
|
