/bionic/libm/upstream-freebsd/lib/msun/src/ |
D | k_sincosl.h | 54 long double hz, r, v, w, z; in __kernel_sincosl() local 56 z = x * x; in __kernel_sincosl() 57 v = z * x; in __kernel_sincosl() 62 r = S2 + z * (S3 + z * (S4 + z * (S5 + z * (S6 + z * (S7 + z * S8))))); in __kernel_sincosl() 65 *sn = x + v * (S1 + z * r); in __kernel_sincosl() 67 *sn = x - ((z * (y / 2 - v * r) - y) - v * S1); in __kernel_sincosl() 69 hz = z / 2; in __kernel_sincosl() 71 r = z * (C1 + z * (C2 + z * (C3 + z * (C4 + z * (C5 + z * (C6 + in __kernel_sincosl() 72 z * C7)))))); in __kernel_sincosl() 73 *cs = w + (((1 - w) - hz) + (z * r - x * y)); in __kernel_sincosl() [all …]
|
D | e_acos.c | 67 double z,p,q,r,w,s,c,df; in __ieee754_acos() local 82 z = x*x; in __ieee754_acos() 83 p = z*(pS0+z*(pS1+z*(pS2+z*(pS3+z*(pS4+z*pS5))))); in __ieee754_acos() 84 q = one+z*(qS1+z*(qS2+z*(qS3+z*qS4))); in __ieee754_acos() 88 z = (one+x)*0.5; in __ieee754_acos() 89 p = z*(pS0+z*(pS1+z*(pS2+z*(pS3+z*(pS4+z*pS5))))); in __ieee754_acos() 90 q = one+z*(qS1+z*(qS2+z*(qS3+z*qS4))); in __ieee754_acos() 91 s = sqrt(z); in __ieee754_acos() 96 z = (one-x)*0.5; in __ieee754_acos() 97 s = sqrt(z); in __ieee754_acos() [all …]
|
D | e_j1.c | 89 double z, s,c,ss,cc,r,u,v,y; in __ieee754_j1() local 102 z = cos(y+y); in __ieee754_j1() 103 if ((s*c)>zero) cc = z/ss; in __ieee754_j1() 104 else ss = z/cc; in __ieee754_j1() 110 if(ix>0x48000000) z = (invsqrtpi*cc)/sqrt(y); in __ieee754_j1() 113 z = invsqrtpi*(u*cc-v*ss)/sqrt(y); in __ieee754_j1() 115 if(hx<0) return -z; in __ieee754_j1() 116 else return z; in __ieee754_j1() 121 z = x*x; in __ieee754_j1() 122 r = z*(r00+z*(r01+z*(r02+z*r03))); in __ieee754_j1() [all …]
|
D | e_j1f.c | 51 float z, s,c,ss,cc,r,u,v,y; in __ieee754_j1f() local 64 z = cosf(y+y); in __ieee754_j1f() 65 if ((s*c)>zero) cc = z/ss; in __ieee754_j1f() 66 else ss = z/cc; in __ieee754_j1f() 72 if(ix>0x58000000) z = (invsqrtpi*cc)/sqrtf(y); /* |x|>2**49 */ in __ieee754_j1f() 75 z = invsqrtpi*(u*cc-v*ss)/sqrtf(y); in __ieee754_j1f() 77 if(hx<0) return -z; in __ieee754_j1f() 78 else return z; in __ieee754_j1f() 83 z = x*x; in __ieee754_j1f() 84 r = z*(r00+z*(r01+z*(r02+z*r03))); in __ieee754_j1f() [all …]
|
D | e_j0.c | 88 double z, s,c,ss,cc,r,u,v; in __ieee754_j0() local 101 z = -cos(x+x); in __ieee754_j0() 102 if ((s*c)<zero) cc = z/ss; in __ieee754_j0() 103 else ss = z/cc; in __ieee754_j0() 109 if(ix>0x48000000) z = (invsqrtpi*cc)/sqrt(x); in __ieee754_j0() 112 z = invsqrtpi*(u*cc-v*ss)/sqrt(x); in __ieee754_j0() 114 return z; in __ieee754_j0() 122 z = x*x; in __ieee754_j0() 123 r = z*(R02+z*(R03+z*(R04+z*R05))); in __ieee754_j0() 124 s = one+z*(S01+z*(S02+z*(S03+z*S04))); in __ieee754_j0() [all …]
|
D | e_j0f.c | 50 float z, s,c,ss,cc,r,u,v; in __ieee754_j0f() local 63 z = -cosf(x+x); in __ieee754_j0f() 64 if ((s*c)<zero) cc = z/ss; in __ieee754_j0f() 65 else ss = z/cc; in __ieee754_j0f() 71 if(ix>0x58000000) z = (invsqrtpi*cc)/sqrtf(x); /* |x|>2**49 */ in __ieee754_j0f() 74 z = invsqrtpi*(u*cc-v*ss)/sqrtf(x); in __ieee754_j0f() 76 return z; in __ieee754_j0f() 84 z = x*x; in __ieee754_j0f() 85 r = z*(R02+z*(R03+z*(R04+z*R05))); in __ieee754_j0f() 86 s = one+z*(S01+z*(S02+z*(S03+z*S04))); in __ieee754_j0f() [all …]
|
D | k_sincos.h | 36 double hz, r, v, w, z; in __kernel_sincos() local 38 z = x * x; in __kernel_sincos() 39 w = z * z; in __kernel_sincos() 40 r = S2 + z * (S3 + z * S4) + z * w * (S5 + z * S6); in __kernel_sincos() 41 v = z * x; in __kernel_sincos() 44 *sn = x + v * (S1 + z * r); in __kernel_sincos() 46 *sn = x - ((z * (y / 2 - v * r) - y) - v * S1); in __kernel_sincos() 48 r = z * (C1 + z * (C2 + z * C3)) + w * w * (C4 + z * (C5 + z * C6)); in __kernel_sincos() 49 hz = z / 2; in __kernel_sincos() 51 *cs = w + (((1 - w) - hz) + (z * r - x * y)); in __kernel_sincos()
|
D | k_cos.c | 71 double hz,z,r,w; in __kernel_cos() local 73 z = x*x; in __kernel_cos() 74 w = z*z; in __kernel_cos() 75 r = z*(C1+z*(C2+z*C3)) + w*w*(C4+z*(C5+z*C6)); in __kernel_cos() 76 hz = 0.5*z; in __kernel_cos() 78 return w + (((one-w)-hz) + (z*r-x*y)); in __kernel_cos()
|
D | k_sin.c | 62 double z,r,v,w; in __kernel_sin() local 64 z = x*x; in __kernel_sin() 65 w = z*z; in __kernel_sin() 66 r = S2+z*(S3+z*S4) + z*w*(S5+z*S6); in __kernel_sin() 67 v = z*x; in __kernel_sin() 68 if(iy==0) return x+v*(S1+z*r); in __kernel_sin() 69 else return x-((z*(half*y-v*r)-y)-v*S1); in __kernel_sin()
|
D | e_acosf.c | 37 float z,p,q,r,w,s,c,df; in __ieee754_acosf() local 50 z = x*x; in __ieee754_acosf() 51 p = z*(pS0+z*(pS1+z*pS2)); in __ieee754_acosf() 52 q = one+z*qS1; in __ieee754_acosf() 56 z = (one+x)*(float)0.5; in __ieee754_acosf() 57 p = z*(pS0+z*(pS1+z*pS2)); in __ieee754_acosf() 58 q = one+z*qS1; in __ieee754_acosf() 59 s = sqrtf(z); in __ieee754_acosf() 65 z = (one-x)*(float)0.5; in __ieee754_acosf() 66 s = sqrtf(z); in __ieee754_acosf() [all …]
|
D | k_sincosf.h | 34 double r, s, w, z; in __kernel_sincosdf() local 36 z = x * x; in __kernel_sincosdf() 37 w = z * z; in __kernel_sincosdf() 38 r = S3 + z * S4; in __kernel_sincosdf() 39 s = z * x; in __kernel_sincosdf() 40 *sn = (x + s * (S1 + z * S2)) + s * w * r; in __kernel_sincosdf() 41 r = C2 + z * C3; in __kernel_sincosdf() 42 *cs = ((1 + z * C0) + w * C1) + (w * z) * r; in __kernel_sincosdf()
|
D | e_rem_pio2.c | 57 double z,w,t,r,fn; in __ieee754_rem_pio2() local 73 z = x - pio2_1; /* one round good to 85 bits */ in __ieee754_rem_pio2() 74 y[0] = z - pio2_1t; in __ieee754_rem_pio2() 75 y[1] = (z-y[0])-pio2_1t; in __ieee754_rem_pio2() 78 z = x + pio2_1; in __ieee754_rem_pio2() 79 y[0] = z + pio2_1t; in __ieee754_rem_pio2() 80 y[1] = (z-y[0])+pio2_1t; in __ieee754_rem_pio2() 85 z = x - 2*pio2_1; in __ieee754_rem_pio2() 86 y[0] = z - 2*pio2_1t; in __ieee754_rem_pio2() 87 y[1] = (z-y[0])-2*pio2_1t; in __ieee754_rem_pio2() [all …]
|
D | k_cosf.c | 39 double r, w, z; in __kernel_cosdf() local 42 z = x*x; in __kernel_cosdf() 43 w = z*z; in __kernel_cosdf() 44 r = C2+z*C3; in __kernel_cosdf() 45 return ((one+z*C0) + w*C1) + (w*z)*r; in __kernel_cosdf()
|
D | k_tanf.c | 41 double z,r,w,s,t,u; in __kernel_tandf() local 43 z = x*x; in __kernel_tandf() 58 r = T[4]+z*T[5]; in __kernel_tandf() 59 t = T[2]+z*T[3]; in __kernel_tandf() 60 w = z*z; in __kernel_tandf() 61 s = z*x; in __kernel_tandf() 62 u = T[0]+z*T[1]; in __kernel_tandf()
|
D | k_sinf.c | 38 double r, s, w, z; in __kernel_sindf() local 41 z = x*x; in __kernel_sindf() 42 w = z*z; in __kernel_sindf() 43 r = S3+z*S4; in __kernel_sindf() 44 s = z*x; in __kernel_sindf() 45 return (x + s*(S1+z*S2)) + s*w*r; in __kernel_sindf()
|
D | k_tan.c | 80 double z, r, v, w, s; in __kernel_tan() local 90 z = pio4 - x; in __kernel_tan() 92 x = z + w; in __kernel_tan() 95 z = x * x; in __kernel_tan() 96 w = z * z; in __kernel_tan() 104 v = z * (T[2] + w * (T[4] + w * (T[6] + w * (T[8] + w * (T[10] + in __kernel_tan() 106 s = z * x; in __kernel_tan() 107 r = y + z * (s * (r + v) + y); in __kernel_tan() 124 z = w; in __kernel_tan() 125 SET_LOW_WORD(z,0); in __kernel_tan() [all …]
|
D | e_lgamma_r.c | 167 double y,z; in sin_pi() local 173 z = vz-0x1p52; /* rint(y) for the above range */ in sin_pi() 174 if (z == y) in sin_pi() 179 z = vz-0x1p50; /* y rounded to a multiple of 0.25 */ in sin_pi() 180 if (z > y) { in sin_pi() 181 z -= 0.25; /* adjust to round down */ in sin_pi() 185 y = y - z + n * 0.25; /* y mod 2 */ in sin_pi() 204 double nadj,p,p1,p2,p3,q,r,t,w,y,z; in __ieee754_lgamma_r() local 252 z = y*y; in __ieee754_lgamma_r() 253 p1 = a0+z*(a2+z*(a4+z*(a6+z*(a8+z*a10)))); in __ieee754_lgamma_r() [all …]
|
D | s_erf.c | 200 double R,S,P,Q,s,y,z,r; in erf() local 214 z = x*x; in erf() 215 r = pp0+z*(pp1+z*(pp2+z*(pp3+z*pp4))); in erf() 216 s = one+z*(qq1+z*(qq2+z*(qq3+z*(qq4+z*qq5)))); in erf() 239 z = x; in erf() 240 SET_LOW_WORD(z,0); in erf() 241 r = __ieee754_exp(-z*z-0.5625)*__ieee754_exp((z-x)*(z+x)+R/S); in erf() 253 double R,S,P,Q,s,y,z,r; in erfc() local 264 z = x*x; in erfc() 265 r = pp0+z*(pp1+z*(pp2+z*(pp3+z*pp4))); in erfc() [all …]
|
D | e_acosl.c | 47 long double z,p,q,r,w,s,c,df; in acosl() local 61 z = x*x; in acosl() 62 p = P(z); in acosl() 63 q = Q(z); in acosl() 67 z = (one+x)*0.5; in acosl() 68 p = P(z); in acosl() 69 q = Q(z); in acosl() 70 s = sqrtl(z); in acosl() 75 z = (one-x)*0.5; in acosl() 76 s = sqrtl(z); in acosl() [all …]
|
D | s_cprojf.c | 38 cprojf(float complex z) in cprojf() argument 41 if (!isinf(crealf(z)) && !isinf(cimagf(z))) in cprojf() 42 return (z); in cprojf() 44 return (CMPLXF(INFINITY, copysignf(0.0, cimagf(z)))); in cprojf()
|
D | s_cprojl.c | 38 cprojl(long double complex z) in cprojl() argument 41 if (!isinf(creall(z)) && !isinf(cimagl(z))) in cprojl() 42 return (z); in cprojl() 44 return (CMPLXL(INFINITY, copysignl(0.0, cimagl(z)))); in cprojl()
|
D | s_erff.c | 84 float R,S,P,Q,s,y,z,r; in erff() local 98 z = x*x; in erff() 99 r = pp0+z*(pp1+z*pp2); in erff() 100 s = one+z*(qq1+z*(qq2+z*qq3)); in erff() 122 SET_FLOAT_WORD(z,hx&0xffffe000); in erff() 123 r = expf(-z*z-0.5625F)*expf((z-x)*(z+x)+R/S); in erff() 131 float R,S,P,Q,s,y,z,r; in erfcf() local 142 z = x*x; in erfcf() 143 r = pp0+z*(pp1+z*pp2); in erfcf() 144 s = one+z*(qq1+z*(qq2+z*qq3)); in erfcf() [all …]
|
/bionic/libm/upstream-freebsd/lib/msun/ld128/ |
D | k_cosl.c | 53 long double hz,z,r,w; in __kernel_cosl() local 55 z = x*x; in __kernel_cosl() 56 r = z*(C1+z*(C2+z*(C3+z*(C4+z*(C5+z*(C6+z*(C7+ in __kernel_cosl() 57 z*(C8+z*(C9+z*(C10+z*C11)))))))))); in __kernel_cosl() 58 hz = 0.5*z; in __kernel_cosl() 60 return w + (((one-w)-hz) + (z*r-x*y)); in __kernel_cosl()
|
D | k_sinl.c | 51 long double z,r,v; in __kernel_sinl() local 53 z = x*x; in __kernel_sinl() 54 v = z*x; in __kernel_sinl() 55 r = S2+z*(S3+z*(S4+z*(S5+z*(S6+z*(S7+z*(S8+ in __kernel_sinl() 56 z*(S9+z*(S10+z*(S11+z*S12))))))))); in __kernel_sinl() 57 if(iy==0) return x+v*(S1+z*r); in __kernel_sinl() 58 else return x-((z*(half*y-v*r)-y)-v*S1); in __kernel_sinl()
|
/bionic/libm/upstream-freebsd/lib/msun/bsdsrc/ |
D | b_exp.c | 94 double z,hi,lo,c; 113 z=x*x; 114 c= x - z*(p1+z*(p2+z*(p3+z*(p4+z*p5)))); 140 double z,hi,lo; local 149 z = invln2*x; 150 k = z + copysign(.5, x); 157 z=x*x; 158 c= x - z*(p1+z*(p2+z*(p3+z*(p4+z*p5))));
|