Searched refs:w_h (Results 1 – 2 of 2) sorted by relevance
| /illumos-gate/usr/src/lib/libm/common/m9x/ |
| H A D | tgammal.c | 631 long double u2, ss_h, ss_l, r_h, w_h, w_l, t4; in large_gam() local
696 w_h = r_h * ss_h + hln2pim1_h; in large_gam()
704 k = (int) ((w_h + w_l) * invln2_32 + half); in large_gam()
713 t1 = w_h - t3 * ln2_32hi; in large_gam()
716 w_h = t1 - w; in large_gam()
717 w_l = w - (t1 - w_h); in large_gam()
720 z = w_h - w_l; in large_gam()
723 t3 = w_h - (w_l - (z * z) * t1); /* t3 = expm1(z) */ in large_gam()
|
| H A D | tgamma.c | 1216 double u2, ss_h, ss_l, r_h, w_h, w_l, t4; in large_gam() local
1281 w_h = r_h * ss_h + hln2pi_h; in large_gam()
1290 k = (int) ((w_h + w_l) * invln2_32 + half); in large_gam()
1298 t1 = w_h - t3 * ln2_32hi; in large_gam()
1301 w_h = t1 + w_l; in large_gam()
1302 w_l = t2 - (w_l - (w_h - t1)); in large_gam()
1305 z = w_h - w_l; in large_gam()
1309 t3 = w_h - (w_l - (t1 + z * t2)); in large_gam()
|