Lines Matching refs:u2
382 double F, f, g, q, u, u2, v, zero = 0.0, one = 1.0;
432 u2 = (2.0*(f - F*u1) - u1*f) * g;
433 /* u1 + u2 = 2f/(2F+f) to extra precision. */
440 u2 = (u2 + logF_tail[j]) + q; /* tiny */
441 u2 += logF_tail[N]*m;
442 return (u1 + u2);
459 double F, f, g, q, u, v, u2, one = 1.0;
484 u2 = (2.0*(f - F*u1) - u1*f) * g;
488 u2 += logF_tail[j]; u2 += q;
489 u2 += logF_tail[N]*m;
490 r.a = u1 + u2; /* Only difference is here */
492 r.b = (u1 - r.a) + u2;