Lines Matching refs:y
76 long double x, y, t, R, S, A, Am1, B, y2, xm1, xp1, Apx;
81 y = LD_IM(z);
83 hy = HI_XWORD(y);
89 if (y == zero || (iy >= 0x7fff0000)) {
91 LD_IM(ans) = -y;
96 /* |y| is inf or NaN */
98 if (isinfl(y)) { /* cacos(x + i inf) = pi/2 - i inf */
99 LD_IM(ans) = -y;
111 LD_RE(ans) = y + x;
115 LD_IM(ans) = y;
120 y = fabsl(y);
126 if (isinfl(y)) {
139 LD_RE(ans) = y + y;
154 * cacos(NaN + i y ) = NaN + i NaN
158 LD_RE(ans) = x + y;
160 LD_IM(ans) = -y;
170 if (y == zero) { /* region 1: y=0 */
188 } else if (y <= E * fabsl(fabsl(x) - one)) {
189 /* region 2: y < tiny*||x|-1| */
193 LD_IM(ans) = y / sqrtl((one + x) * (one - x));
196 LD_RE(ans) = y / x;
201 t = pi_l + y / x;
209 LD_RE(ans) = (hx >= 0)? y / t : pi - (y / t - pi_l);
215 } else if (y < Foursqrtu) { /* region 3 */
216 t = sqrtl(y);
219 } else if (E * y - one >= fabsl(x)) { /* region 4 */
221 LD_IM(ans) = ln2 + logl(y);
223 /* region 5: x+1 and y are both (>= sqrt(max)/8) i.e. 2**8188 */
224 t = x / y;
225 LD_RE(ans) = atan2l(y, x);
226 LD_IM(ans) = ln2 + logl(y) + half * log1pl(t * t);
230 A = sqrtl(one + y * y);
231 if (iy >= 0x3fff8000) /* if y > Acrossover */
232 LD_IM(ans) = logl(y + A);
234 LD_IM(ans) = half * log1pl((y + y) * (y + A));
237 y2 = y * y;
253 LD_RE(ans) = atan2l((y * sqrtl(half * (Apx /