Lines Matching refs:y
70 long double x, y, t, R, S, A, Am1, B, y2, xm1, xp1, Apx; in casinl() local
75 y = LD_IM(z); in casinl()
77 hy = HI_XWORD(y); in casinl()
81 y = fabsl(y); in casinl()
90 if (isinfl(y)) in casinl()
94 LD_RE(ans) = y + y; in casinl()
105 LD_IM(ans) = y + y; in casinl()
111 LD_IM(ans) = LD_RE(ans) = x + y; in casinl()
122 if (x == zero && y == zero) in casinl()
126 if (isinfl(y)) { /* casin(x + i inf) = 0 + i inf */ in casinl()
127 LD_IM(ans) = y; in casinl()
130 LD_IM(ans) = x + y; in casinl()
134 LD_RE(ans) = y; in casinl()
143 if (y == zero) { /* region 1: y=0 */ in casinl()
160 } else if (y <= E * fabsl(x - one)) { /* region 2: y < tiny*|x-1| */ in casinl()
163 LD_IM(ans) = y / sqrtl((one + x) * (one - x)); in casinl()
175 } else if (y < Foursqrtu) { /* region 3 */ in casinl()
176 t = sqrtl(y); in casinl()
179 } else if (E * y - one >= x) { /* region 4 */ in casinl()
180 LD_RE(ans) = x / y; /* need to fix underflow cases */ in casinl()
181 LD_IM(ans) = ln2 + logl(y); in casinl()
184 t = x / y; in casinl()
186 LD_IM(ans) = ln2 + logl(y) + half * log1pl(t * t); in casinl()
189 A = sqrtl(one + y * y); in casinl()
192 LD_IM(ans) = logl(y + A); in casinl()
194 LD_IM(ans) = half * log1pl((y + y) * (y + A)); in casinl()
196 y2 = y * y; in casinl()
211 LD_RE(ans) = atanl(x / (y * sqrtl(half * (Apx / in casinl()