s_expl.c | 159 long double fn, hx2_hi, hx2_lo, q, r, r1, r2, t, twomk, twopk, x_hi; local in function:expm1l 209 x_hi = (float)x; 210 x_lo = x - x_hi; 211 hx2_hi = x_hi * x_hi / 2; 212 hx2_lo = x_lo * (x + x_hi) / 2; 214 RETURNI((hx2_hi + x_hi) + (hx2_lo + x_lo + q));
|