- t2ex
- bsd_source/lib/libc/src_bsd/math/e_jn.c - 9.3KB - 261 lines
70: sgn = (n&1)&(hx>>31); /* even n -- 0, odd n -- sign(x) */
71: x = fabs(x);
72: if((ix|lx)==0||ix>=0x7ff00000) /* if x is 0 or inf */
- More results from e_jn.c
- bsd_source/lib/libc/src_bsd/math/e_lgamma_r.c - 12.2KB - 304 lines
226: if(t==zero) return one/zero; /* -integer */
227: nadj = log(pi/fabs(t*x));
228: if(t<zero) *signgamp = -1;
- bsd_source/lib/libc/src_bsd/math/e_pow.c - 11.5KB - 311 lines
159:
160: ax = fabs(x);
161: /* special value of x */
- bsd_source/lib/libc/src_bsd/math/e_rem_pio2.c - 5.3KB - 146 lines
90: if(ix<=0x413921fb) { /* |x| ~<= 2^19*(pi/2), medium size */
91: t = fabs(x);
92: n = (int32_t) (t*invpio2+half);
- bsd_source/lib/libc/src_bsd/math/e_remainder.c - 2.1KB - 82 lines
55: if (((hx-hp)|(lx-lp))==0) return zero*x;
56: x = fabs(x);
57: p = fabs(p);
- More results from e_remainder.c
- bsd_source/lib/libc/src_bsd/math/e_sinh.c - 2.5KB - 88 lines
60: if(shuge+x>one) return x;/* sinh(tiny) = tiny with inexact */
61: t = expm1(fabs(x));
62: if(ix<0x3ff00000) return h*(2.0*t-t*t/(t+one));
- More results from e_sinh.c
- bsd_source/lib/libc/src_bsd/math/k_tan.c - 5.9KB - 151 lines
85: if(((ix | low) | (iy + 1)) == 0)
86: return one / fabs(x);
87: else {
- bsd_source/lib/libc/src_bsd/math/s_asinh.c - 1.9KB - 67 lines
48: if(ix>0x41b00000) { /* |x| > 2**28 */
49: w = log(fabs(x))+ln2;
50: } else if (ix>0x40000000) { /* 2**28 > |x| > 2.0 */
- More results from s_asinh.c
- bsd_source/lib/libc/src_bsd/math/s_atan.c - 4.6KB - 129 lines
94: } else {
95: x = fabs(x);
96: if (ix < 0x3ff30000) { /* |x| < 1.1875 */
- bsd_source/lib/libc/src_bsd/math/s_erf.c - 12.7KB - 312 lines
214: if(ix < 0x3ff40000) { /* 0.84375 <= |x| < 1.25 */
215: s = fabs(x)-one;
216: P = pa0+s*(pa1+s*(pa2+s*(pa3+s*(pa4+s*(pa5+s*pa6)))));
- More results from s_erf.c