Home | History | Annotate | Download | only in ld80

Lines Matching defs:thi

120 	long double p, z, thi, tlo, xhi, xlo;
137 	thi = xhi * u.a;
140 	/* Compute thi + tlo + ln2pi_hi + ln2pi_lo + p. */
144 	u.a += thi;
145 	u.b = thi - u.a;
201 	long double p, q, thi, tlo;
211 	thi = (float)z;
212 	tlo = (z - thi) + c;
213 	tlo *= (thi + z);
216 	thi *= thi;
217 	q = thi;
218 	thi = (float)thi;
219 	tlo += (q - thi);
225 	tlo = tlo * p + thi * r.b + a0_lo;
226 	thi *= r.a;				/* t = (z+c)^2*(P/Q) */
227 	r.a = (float)(thi + a0_hi);
228 	r.b = ((a0_hi - r.a) + thi) + tlo;