Lines Matching defs:t1
627 long double z, t1, t2, t3, z2, t5, w, y, u, r, v;
665 t1 = y + z;
667 r = one / t1;
669 t1 = CHOPPED(t1);
682 t2 = t5 + r * ((two * t2 - v * t1) - v * (y - (t1 - z)));
699 t1 = GP[19];
701 t1 = z2 * t1 + GP[i];
703 w_l = z * (GP[0] + z2 * t1) + w;
713 t1 = w_h - t3 * ln2_32hi;
716 w_h = t1 - w;
717 w_l = w - (t1 - w_h);
721 for (t1 = Et[10], i = 9; i >= 0; i--)
722 t1 = z * t1 + Et[i];
723 t3 = w_h - (w_l - (z * z) * t1); /* t3 = expm1(z) */
757 long double z, t1, t2;
765 t1 = z * x;
766 t2 *= z * t1;
767 xx.l = t1 * ks[0] + t2;
830 long double z, t1, t2, t3, t4, x4, x8;
836 t1 = (long double) ((float) x);
838 t2 = npi_2_l * z + npi_2_h * (x + t1) * (x - t1);
842 t4 = t1 * t1 * npi_2_h;
1012 long double t, t1, t2, t3, t4, t5, w, y, z, z1, z2, z3, z5;
1064 t1 = floorl(w);
1065 t2 = t1 * half;
1067 if (t1 == w) {
1137 t1 = CHOPPED((y));
1140 ww.l = y * (ww.l - (t2 - ww.h)) + (y - t1) * t2;
1141 ww.h = t1 * t2;
1149 t1 = CHOPPED((t3));
1151 z1 = ss.l - (t1 - ss.h); /* (t1,z1) = ss */
1155 t5 = t1 * t2;
1156 z5 = z1 * t4 + t1 * z2; /* (t5,z5) = ss*ww */
1157 t1 = CHOPPED((t3)); /* (t1,z1) = ss*ww */
1158 z1 = z5 - (t1 - t5);
1160 z2 = z3 * (t2 * z1 - (one - t2 * t1));