Lines Matching refs:yh
146 * compute gamma(y=yh+yl) for y in GT1 = [1.0000, 1.2845]
147 * ...assume yh got 53 or 24(i386) significant bits
151 GT1(long double yh, long double yl) {
156 y = yh + yl;
163 t4 = TZ1 * yh;
172 * compute gamma(y=yh+yl) for y in GT2 = [1.2844, 1.6374]
173 * ...assume yh got 53 significant bits
177 GT2(long double yh, long double yl) {
182 y = yh + yl;
195 * compute gamma(y=yh+yl) for y in GT3 = [1.6373, 2.0000]
196 * ...assume yh got 53 significant bits
200 GT3(long double yh, long double yl) {
205 y = yh + yl;
212 t4 = TZ3 * yh;
883 long double r1, r2, t2, z, xh, xl, yh, yl, zh, z1, z2, zl, x5, wh, wl;
956 yh = CHOPPED((z));
957 yl = (x - (zh - 2.0L)) * (z2 + zh) - (yh - zh * (zh + one));
961 xl = yl * (z2 + yh) - (xh - yh * (yh - 2.0L));
970 yh = CHOPPED((z));
972 yl = z1 * (z2 + zh) - (yh - zh * (zh + one));
978 xl = yl * (z2 + yh) - (xh - yh * (yh - 2.0L));
991 yh = CHOPPED((z)); /* yh+yl = (x+3)(x+4) */
992 yl = (x - (zh - 3.0L)) * (z2 + zh) - (yh - (zh * (zh + one)));
997 xl = yl * (z2 + yh) - (xh - yh * (yh - 2.0L));
1002 wl = (z2 * yy.l + yl * yy.h) - (wh - (yh - 6.0L) * yy.h);