Lines Matching refs:thi
120 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;
182 double p, q, thi, tlo;
191 thi = (float)z;
192 tlo = (z - thi) + c;
193 tlo *= (thi + z);
196 thi *= thi;
197 q = thi;
198 thi = (float)thi;
199 tlo += (q - thi);
205 tlo = tlo * p + thi * r.b + a0_lo;
206 thi *= r.a; /* t = (z+c)^2*(P/Q) */
207 r.a = (float)(thi + a0_hi);
208 r.b = ((a0_hi - r.a) + thi) + tlo;