CMPLXL
return (CMPLXL(x, y+y));
return (CMPLXL(y, x+x));
if (y == 0) return (CMPLXL(x+x, y));
return (CMPLXL(x+0.0L+(y+0), x+0.0L+(y+0)));
return (CMPLXL(copysignl(creall(w), x), copysignl(cimagl(w), y)));
return (CMPLXL(copysignl(rx, x), copysignl(ry, y)));
long double complex w = casinhl(CMPLXL(cimagl(z), creall(z)));
return (CMPLXL(cimagl(w), creall(w)));
return (CMPLXL(y+y, -INFINITY));
return (CMPLXL(x+x, -y));
if (x == 0) return (CMPLXL(pio2_hi + pio2_lo, y+y));
return (CMPLXL(x+0.0L+(y+0), x+0.0L+(y+0)));
return (CMPLXL(rx, ry));
return (CMPLXL(0, -y));
return (CMPLXL(pio2_hi - (x - pio2_lo), -y));
return (CMPLXL(rx, ry));
return (CMPLXL(ry, rx));
return (CMPLXL(fabsl(ry), rx));
return (CMPLXL(ry, ry));
return (CMPLXL(fabsl(ry), copysignl(rx, cimagl(z))));
return (CMPLXL(logl(hypotl(x / m_e, y / m_e)) + 1, atan2l(y, x)));
return (CMPLXL(logl(hypotl(x, y)), atan2l(y, x)));
return (CMPLXL(logl(ax*ax + ay*ay) / 2, atan2l(y, x)));
return (CMPLXL(atanhl(x), y)); /* XXX need atanhl() */
return (CMPLXL(x, atanl(y)));
return (CMPLXL(copysignl(0, x), y+y));
return (CMPLXL(copysignl(0, x), copysignl(pio2_hi + pio2_lo, y)));
return (CMPLXL(x+0.0L+(y+0), x+0.0L+(y+0)));
return (CMPLXL(real_part_reciprocal(x, y), copysignl(pio2_hi + pio2_lo, y)));
return (CMPLXL(copysignl(rx, x), copysignl(ry, y)));
long double complex w = catanhl(CMPLXL(cimagl(z), creall(z)));
return (CMPLXL(cimagl(w), creall(w)));
return (CMPLXL(c * exp_x * scale1 * scale2,
return (CMPLXL(expl(x), y));
return (CMPLXL(c, s));
return (CMPLXL(y - y, y - y));
return (CMPLXL(0.0, 0.0));
return (CMPLXL(x, y - y));
return (CMPLXL(exp_x * c, exp_x * s));
return (CMPLXL(c * exp_x * scale1 * scale2,
RETURNI(CMPLXL(exp_x * c, exp_x * s));
RETURNI(CMPLXL(expl(x), y));
RETURNI(CMPLXL(c, s));
RETURNI(CMPLXL(y - y, y - y));
RETURNI(CMPLXL(0.0, 0.0));
RETURNI(CMPLXL(x, y - y));
#ifndef CMPLXL
RETURNI(CMPLXL(logl(hypotl(x, y)), v));
RETURNI(CMPLXL(logl(hypotl(x * 0x1p16383L, y * 0x1p16383L)) +
RETURNI(CMPLXL(logl(hypotl(x, y)), v));
RETURNI(CMPLXL(logl(ay2l + ax2l + sl + sh) / 2, v));
RETURNI(CMPLXL(log1pl(ay2l + t + sh) / 2, v));
RETURNI(CMPLXL(logl(hypotl(x, y)), v));
RETURNI(CMPLXL((ay / 2) * ay, v));
RETURNI(CMPLXL(log1pl(ay * ay) / 2, v));
RETURNI(CMPLXL(logl(ax), v));
RETURNI(CMPLXL(logl(hypotl(x * 0x1p-16382L, y * 0x1p-16382L)) +