Lines Matching refs:t4
1151 double t3, t4, y, z; in GT1() local
1159 t4 = TZ1 * yh; in GT1()
1160 r.h = (double) ((float) (t4 + GZ1_h + t3)); in GT1()
1161 t3 += (t4 - (r.h - GZ1_h)); in GT1()
1187 double t3, t4, y, z; in GT3() local
1195 t4 = TZ3 * yh; in GT3()
1196 r.h = (double) ((float) (t4 + GZ3_h + t3)); in GT3()
1197 t3 += (t4 - (r.h - GZ3_h)); in GT3()
1216 double u2, ss_h, ss_l, r_h, w_h, w_l, t4; in large_gam() local
1258 t4 = T2[j2 + 1] + T1[n2 + 1]; in large_gam()
1263 t2 = t4 + u * ((two + z2 * A1) + (z2 * z2) * (A2 + z2 * A3)); in large_gam()
1265 t5 = t4 + u * (z2 * A1 + (z2 * z2) * (A2 + z2 * A3)); in large_gam()
1335 double z, t1, t2, t3, t4; in kpsin() local
1342 t4 = t1 * ks[0]; in kpsin()
1345 xx.l = t4 + t3; in kpsin()
1373 double z, t1, t2, t3, t4, x4, x8; in kpcos() local
1383 t4 = t1 * t1; /* 48 bits mantissa */ in kpcos()
1385 t4 *= npi_2_h; /* npi_2_h is 5 bits const. The product is exact */ in kpcos()
1386 xx.l = x8 + t4; /* that will minimized the rounding error in xx.l */ in kpcos()
1534 double t, t1, t2, t3, t4, t5, w, y, z, z1, z2, z3, z5; in tgamma() local
1649 t4 = ww.h + ww.l; in tgamma()
1651 t2 = (double) ((float) t4); in tgamma()
1661 t4 = ww.h + ww.l; in tgamma()
1663 t2 = (double) ((float) t4); in tgamma()
1666 t3 = t3 * t4; /* t3 = ss*ww */ in tgamma()
1669 z5 = z1 * t4 + t1 * z2; /* (t5,z5) = ss*ww */ in tgamma()