Lines Matching refs:z2
627 long double z, t1, t2, t3, z2, t5, w, y, u, r, v; in large_gam() local
671 z2 = u * u; in large_gam()
675 t5 = z2 * t5 + T3[i]; in large_gam()
677 t2 = t4 + u * (two + z2 * t5); in large_gam()
679 t5 = t4 + (u * z2) * t5; in large_gam()
697 z2 = z * z; in large_gam()
701 t1 = z2 * t1 + GP[i]; in large_gam()
703 w_l = z * (GP[0] + z2 * t1) + w; in large_gam()
883 long double r1, r2, t2, z, xh, xl, yh, yl, zh, z1, z2, zl, x5, wh, wl; in gam_n() local
925 z2 = x + 2.0L; in gam_n()
926 z = z1 * z2; in gam_n()
929 xl = (x - (zh - one)) * (z2 + zh) - (xh - zh * (zh + one)); in gam_n()
937 z2 = (x + one) * (x + 3.0L); in gam_n()
940 xh = CHOPPED(z2); in gam_n()
948 rr.l = z2 * wl + xl * wh; in gam_n()
953 z2 = x + 3.0L; in gam_n()
954 z = z1 * z2; in gam_n()
957 yl = (x - (zh - 2.0L)) * (z2 + zh) - (yh - zh * (zh + one)); in gam_n()
958 z2 = z - 2.0L; in gam_n()
959 z *= z2; in gam_n()
961 xl = yl * (z2 + yh) - (xh - yh * (yh - 2.0L)); in gam_n()
967 z2 = x + 3.0L; in gam_n()
968 z = z1 * z2; in gam_n()
972 yl = z1 * (z2 + zh) - (yh - zh * (zh + one)); in gam_n()
973 z2 = z - 2.0L; in gam_n()
975 z *= z2; in gam_n()
978 xl = yl * (z2 + yh) - (xh - yh * (yh - 2.0L)); in gam_n()
988 z2 = x + 4.0L; in gam_n()
989 z = z2 * z1; in gam_n()
992 yl = (x - (zh - 3.0L)) * (z2 + zh) - (yh - (zh * (zh + one))); in gam_n()
994 z2 = z - 2.0L; /* z2 = (x+2)*(x+5) */ in gam_n()
995 z *= z2; in gam_n()
997 xl = yl * (z2 + yh) - (xh - yh * (yh - 2.0L)); in gam_n()
1000 z2 -= 4.0L; /* z2 = (x+1)(x+6) */ in gam_n()
1001 wh = CHOPPED((z2 * (yy.h + yy.l))); in gam_n()
1002 wl = (z2 * yy.l + yl * yy.h) - (wh - (yh - 6.0L) * yy.h); in gam_n()
1012 long double t, t1, t2, t3, t4, t5, w, y, z, z1, z2, z3, z5; local
1152 z2 = ww.l - (t2 - ww.h); /* (t2,z2) = ww */
1156 z5 = z1 * t4 + t1 * z2; /* (t5,z5) = ss*ww */
1160 z2 = z3 * (t2 * z1 - (one - t2 * t1));
1161 z = t2 - z2;