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