Searched defs:s2h (Results 1 - 2 of 2) sorted by relevance

/illumos-gate/usr/src/lib/libm/common/complex/
H A Dk_clog_r.c67 * Note 2. 2s can be computed accurately as s2h+s2t by
70 * s2h = s2 rounded to float; v = 0.5*s2h;
71 * s2t = r*((((zh-s2h*(1+zk))-v*zh)+zt)-v*zt)
227 double y, r, w, s2, s2h, s2t, t, zk, v, P; local
233 s2h = s2 = r * t;
234 ((int *)&s2h)[LOWORD] &= 0xe0000000;
235 v = half * s2h;
237 s2t = r * ((((zh - s2h * zk) - v * zh) + (*zt)) - v * (*zt));
241 y = t + (P + s2h);
[all...]
H A Dk_clog_rl.c71 * Note 2. 2s can be computed accurately as s2h+s2t by
74 * s2h = s2 rounded to double; v = 0.5*s2h;
75 * s2t = r*((((zh-s2h*(1+zk))-v*zh)+zt)-v*zt)
365 long double y, r, w, s2, s2h, s2t, t, zk, v, P; local
378 s2h = s2 = r * t;
382 ((unsigned *)&s2h)[0] = 0; /* 32 bits chopped */
385 lx = ((unsigned *)&s2h)[2]; /* 56 bits rounded */
387 ((unsigned *)&s2h)[2] = (j << 25);
388 lx = ((unsigned *)&s2h)[
[all...]

Completed in 44 milliseconds