/illumos-gate/usr/src/lib/libm/common/C/ |
H A D | __tan.c | 124 double a, t, z, w = 0.0L, s, c, r, rh, xh, xl; local 146 * Also let xh = x+T chopped to 20 bits, xl = (x-xh)+T. Then 148 * = rh + r*((1+rh*xh)+rh*xl). 152 xh = w; 153 ((int *) &xh)[LOWORD] = 0; 154 xl = (x - xh) + t; 155 return (rh + r * ((one + rh * xh) + rh * xl)); 180 * Also let xh = a+c chopped to 20 bits, xl = (a-xh) [all...] |
H A D | hypot.c | 44 * xh*xh+(y*y+((x-xh)*(x+xh))) for x*x+y*y 45 * where xh = x with lower 32 bits cleared; else 80 double xh, yh, w, ax, ay; local 186 ((int *) &xh)[HIWORD] = ix; 187 ((int *) &xh)[LOWORD] = 0; 188 ay = ay * ay + (ax - xh) * (ax + xh); [all...] |
H A D | atan2.c | 410 double ah, al, t, xh, x, y, z; local 493 xh = x; 494 ((int *)&xh)[LOWORD] = 0; 495 z = ((y - t * xh) - t * (x - xh)) / (x + y * t);
|
/illumos-gate/usr/src/lib/libm/common/complex/ |
H A D | cabs.c | 53 double x, y, xh, yh, w, ax, ay; local 161 ((int *)&xh)[HIWORD] = ix; 162 ((int *)&xh)[LOWORD] = 0; 163 ay = ay * ay + (ax - xh) * (ax + xh); 164 ax = sqrt(xh * xh + ay); 167 ((int *)&xh)[HIWORD] = ix + 0x00100000; 168 ((int *)&xh)[LOWORD] = 0; 171 ay = w * w + ((ax - xh) * y [all...] |
H A D | k_atan2.c | 458 double t, xh, th, t1, t2, w1, w2; local 515 xh = x; 516 ((int *) &xh)[LOWORD] &= 0xf8000000; 517 t1 = (x - xh) * t + xh * (t - th); 518 t2 = y - xh * th; 535 xh = x; 536 ((int *) &xh)[LOWORD] &= 0xf8000000; 537 t1 = (x - xh) * t + xh * ( [all...] |
H A D | k_atan2l.c | 724 long double t, xh, th, t1, t2, w1, w2; local 777 xh = x; HALF(xh); 778 t1 = (x - xh) * t + xh * (t - th); 779 t2 = y - xh * th; 795 xh = x; HALF(xh); 796 t1 = (x - xh) * t + xh * ( [all...] |
/illumos-gate/usr/src/lib/libast/common/uwin/ |
H A D | exp__E.c | 118 double z,p,q,xp,xh,w; local 128 xh= x*half ; 129 w = xh-(q-xp) ; 131 c += x*((xh*w-(q-(p+xp)))/(one-w)+c);
|
/illumos-gate/usr/src/lib/libmvec/common/ |
H A D | __vatan2.c | 73 double z0, z1, z2, sign0, sign1, sign2, xh; local 182 xh = x0; 183 LO(&xh) = 0; 184 z0 = ((y0 - t0 * xh) - t0 * (x0 - xh)) / (x0 + y0 * t0); 297 xh = x1; 298 LO(&xh) = 0; 299 z1 = ((y1 - t1 * xh) - t1 * (x1 - xh)) / (x1 + y1 * t1); 412 xh [all...] |
/illumos-gate/usr/src/lib/libm/common/m9x/ |
H A D | tgamma.c | 1408 double r1, r2, t2, z, xh, xl, yh, yl, zh, z1, z2, zl, x5, wh, wl; local 1434 xh = (double) ((float) x); /* x is not tiny */ 1436 rr.l = r1 * (yy.h - rr.h * xh) - 1437 ((r1 * rr.h) * (x - xh) - r1 * yy.l); 1453 xh = (double) ((float) z); 1455 xl = (x - (zh - one)) * (z2 + zh) - (xh - zh * (zh + one)); 1456 rr.h = xh * yy.h; 1468 xh = (double) ((float) z); 1469 xl = zl * (z2 + zh * (z1 + zh)) - (xh - zh * (zh * zh - one)); 1470 rr.h = xh * y [all...] |
H A D | tgammal.c | 883 long double r1, r2, t2, z, xh, xl, yh, yl, zh, z1, z2, zl, x5, wh, wl; local 908 xh = CHOPPED((x)); /* x is not tiny */ 910 rr.l = r1 * (yy.h - rr.h * xh) - ((r1 * rr.h) * (x - xh) - 927 xh = CHOPPED((z)); 929 xl = (x - (zh - one)) * (z2 + zh) - (xh - zh * (zh + one)); 931 rr.h = xh * yy.h; 940 xh = CHOPPED(z2); 941 xl = zl * (zh + z1) - (xh - (zh * zh - one)); 947 rr.h = xh * w [all...] |
/illumos-gate/usr/src/uts/common/io/ath/ |
H A D | hal_x86_64.o.uu | 1698 AABIi0Mgx4CACAAAAAAAAEWF7Q+VwA+2wEiDxAhbXUFcQV3DRItcJBhEi1QkKA+/h/xh
|