Lines Matching refs:t
183 struct Double t, u, v; local
194 t.a = v.a*u.a; /* t = (x-.5)*(log(x)-1) */
195 t.b = v.b*u.a + x*u.b;
197 t.b += lns2pi_lo; t.b += p;
198 u.a = lns2pi_hi + t.b; u.a += t.a;
199 u.b = t.a - u.a;
200 u.b += lns2pi_hi; u.b += t.b;
211 double y, ym1, t; local
226 t = r.a*yy.a;
228 r.a = t;
230 r.b += (t - r.a);
245 double t, d; local
248 t = x, TRUNC(t);
249 d = (t+x)*(x-t);
250 t *= t;
251 xx.a = (t + x), TRUNC(xx.a);
252 xx.b = x - xx.a; xx.b += t; xx.b += d;
253 t = (one-x0); t += x;
254 d = (one-x0); d -= t; d += x;
259 t = x - x0;
260 d = (-x0 -t); d += x;
262 r = ratfun_gam(t, d);
275 struct Double r, t; local
282 t.a = z, TRUNC(t.a); /* t ~= z + c */
283 t.b = (z - t.a) + c;
284 t.b *= (t.a + z);
285 q = (t.a *= t.a); /* t = (z+c)^2 */
286 TRUNC(t.a);
287 t.b += (q - t.a);
290 t.b = t.b*p + t.a*r.b + a0_lo;
291 t.a *= r.a; /* t = (z+c)^2*(P/Q) */
292 r.a = t.a + a0_hi, TRUNC(r.a);
293 r.b = ((a0_hi-r.a) + t.a) + t.b;