Lines Matching refs:w1
70 long double t1, t2, t3, t4, w1, w2, t; in sum4fpl() local
93 w1 = t3 + t4; in sum4fpl()
94 w2 = t4 - (w1 - t3); in sum4fpl()
95 t = t2 + w1; in sum4fpl()
96 w2 += w1 - (t - t2); in sum4fpl()
97 w1 = t + w2; in sum4fpl()
98 w2 += t - w1; in sum4fpl()
99 t = t1 + w1; in sum4fpl()
100 w2 += w1 - (t - t1); in sum4fpl()
101 w1 = t + w2; in sum4fpl()
102 *w = w2 - (w1 - t); in sum4fpl()
103 return (w1); in sum4fpl()
110 long double t1, t2, t3, t4, x1, x2, y1, y2, u1, v1, b[4], w1, w2; in cpowl() local
167 w1 = r + t; in cpowl()
168 w2 = t - (w1 - r); in cpowl()
169 sincospil(w1, &t1, &t2); in cpowl()
222 w1 = b[0] + b[1]; in cpowl()
223 w2 = b[1] - (w1 - b[0]); in cpowl()
227 w1 = sum4fpl(b, &w2); in cpowl()
229 sincosl(w1, &t1, &t2); in cpowl()
244 w1 = b[0] + b[1]; in cpowl()
245 w2 = b[1] - (w1 - b[0]); in cpowl()
249 w1 = sum4fpl(b, &w2); in cpowl()
252 if (k != 0 && fabsl(w1) < 20000.0L) { in cpowl()
253 w1 *= 65536.0L; w2 *= 65536.0L; in cpowl()
255 hx = HI_XWORD(w1); in cpowl()
264 k = (int) (invln2 * w1 + ((hx >= 0)? 0.5L : -0.5L)); in cpowl()
266 t2 = w1 - t1 * ln2hil; in cpowl()