152 	long double t3, t4, y;  in GT1()  local
157 	for (t4 = Q1[8], t3 = P1[8] + y * P1[9], i = 7; i >= 0; i--) {  in GT1()
159 		t3 = t3 * y + P1[i];  in GT1()
161 	t3 = (y * y) * t3 / t4;  in GT1()
162 	t3 += (TZ1 * yl + GZ1_l);  in GT1()
164 	r.h = CHOPPED((t4 + GZ1_h + t3));  in GT1()
165 	t3 += (t4 - (r.h - GZ1_h));  in GT1()
166 	r.l = t3;  in GT1()
178 	long double t3, t4, y;  in GT2()  local
183 	for (t4 = Q2[9], t3 = P2[9], i = 8; i >= 0; i--) {  in GT2()
185 		t3 = t3 * y + P2[i];  in GT2()
187 	t3 = GZ2_l + (y * y) * t3 / t4;  in GT2()
188 	r.h = CHOPPED((GZ2_h + t3));  in GT2()
189 	r.l = t3 - (r.h - GZ2_h);  in GT2()
201 	long double t3, t4, y;  in GT3()  local
206 	for (t4 = Q3[9], t3 = P3[9], i = 8; i >= 0; i--) {  in GT3()
208 		t3 = t3 * y + P3[i];  in GT3()
210 	t3 = (y * y) * t3 / t4;  in GT3()
211 	t3 += (TZ3 * yl + GZ3_l);  in GT3()
213 	r.h = CHOPPED((t4 + GZ3_h + t3));  in GT3()
214 	t3 += (t4 - (r.h - GZ3_h));  in GT3()
215 	r.l = t3;  in GT3()
627 	long double z, t1, t2, t3, z2, t5, w, y, u, r, v;  in large_gam()  local
673 	t3 = T2[j2] + T1[n2];  in large_gam()
683 		t3 += v;  in large_gam()
685 	ss_h = CHOPPED((t2 + t3));  in large_gam()
686 	ss_l = t2 - (ss_h - t3);  in large_gam()
710 	t3 = (long double) k;  in large_gam()
713 	t1 = w_h - t3 * ln2_32hi;  in large_gam()
714 	t2 = t3 * ln2_32lo;  in large_gam()
723 	t3 = w_h - (w_l - (z * z) * t1);	/* t3 = expm1(z) */  in large_gam()
724 	zz.l = S_trail[j] * (one + t3) + S[j] * t3;  in large_gam()
830 	long double z, t1, t2, t3, t4, x4, x8;  in kpcos()  local
839 	for (i = 8, t3 = kc[9]; i >= 0; i--)  in kpcos()
840 		t3 = z * t3 + kc[i];  in kpcos()
841 	t3 = one_pi_l + x4 * t3;  in kpcos()
843 	x8 = t2 + t3;  in kpcos()
1012 	long double t, t1, t2, t3, t4, t5, w, y, z, z1, z2, z3, z5;  local
1066 		t3 = floorl(t2);
1068 			if (t2 == t3)
1073 			if (t2 == t3)
1147 	t3 = ss.h + ss.l;
1149 	t1 = CHOPPED((t3));
1153 	t3 = t3 * t4;			/* t3 = ss*ww */
1154 	z3 = one / t3;			/* z3 = 1/(ss*ww) */
1157 	t1 = CHOPPED((t3));		/* (t1,z1) = ss*ww */