- t2ex
- bsd_source/lib/libc/src_bsd/complex/s_csqrt.c - 3.8KB - 144 lines
82: r = fabs (x);
83: r = sqrt (r);
84: if (x < 0.0) {
- More results from s_csqrt.c
- bsd_source/lib/libc/src_bsd/math/e_acos.c - 3.9KB - 113 lines
87: q = one+z*(qS1+z*(qS2+z*(qS3+z*qS4)));
88: s = sqrt(z);
89: r = p/q;
- More results from e_acos.c
- bsd_source/lib/libc/src_bsd/math/e_acosh.c - 2.0KB - 71 lines
56: t=x*x;
57: return log(2.0*x-one/(x+sqrt(t-one)));
58: } else { /* 1<x<2 */
- More results from e_acosh.c
- bsd_source/lib/libc/src_bsd/math/e_asin.c - 4.2KB - 121 lines
97: q = one+t*(qS1+t*(qS2+t*(qS3+t*qS4)));
98: s = sqrt(t);
99: if(ix>=0x3FEF3333) { /* if |x| > 0.975 */
- bsd_source/lib/libc/src_bsd/math/e_hypot.c - 4.1KB - 134 lines
106: t2 = a-t1;
107: w = sqrt(t1*t1-(b*(-b)-t2*(a+t1)));
108: } else {
- More results from e_hypot.c
- bsd_source/lib/libc/src_bsd/math/e_j0.c - 15.1KB - 379 lines
103: */
104: if(ix>0x48000000) z = (invsqrtpi*cc)/sqrt(x);
105: else {
- More results from e_j0.c
- bsd_source/lib/libc/src_bsd/math/e_j1.c - 14.7KB - 374 lines
104: */
105: if(ix>0x48000000) z = (invsqrtpi*cc)/sqrt(y);
106: else {
- More results from e_j1.c
- bsd_source/lib/libc/src_bsd/math/e_jn.c - 9.3KB - 261 lines
95: }
96: b = invsqrtpi*temp/sqrt(x);
97: } else {
- More results from e_jn.c
- bsd_source/lib/libc/src_bsd/math/e_pow.c - 11.5KB - 311 lines
155: if(hx>=0) /* x >= +0 */
156: return sqrt(x);
157: }
- bsd_source/lib/libc/src_bsd/math/s_asinh.c - 1.9KB - 67 lines
51: t = fabs(x);
52: w = log(2.0*t+one/(sqrt(x*x+one)+t));
53: } else { /* 2.0 > |x| > 2**-28 */
- More results from s_asinh.c