if (ix >= 0x7f800000) {
if (ix & 0x7fffff)
- return cpackf(x, (y == 0 ? y : x * y));
+ return CMPLXF(x, (y == 0 ? y : x * y));
SET_FLOAT_WORD(x, hx - 0x40000000);
- return cpackf(x, copysignf(0, isinf(y) ? y : sinf(y) * cosf(y)));
+ return CMPLXF(x, copysignf(0, isinf(y) ? y : sinf(y) * cosf(y)));
}
if (!isfinite(y))
- return cpackf(y - y, y - y);
+ return CMPLXF(y - y, y - y);
if (ix >= 0x41300000) { /* x >= 11 */
float exp_mx = expf(-fabsf(x));
- return cpackf(copysignf(1, x), 4 * sinf(y) * cosf(y) * exp_mx * exp_mx);
+ return CMPLXF(copysignf(1, x), 4 * sinf(y) * cosf(y) * exp_mx * exp_mx);
}
t = tanf(y);
s = sinhf(x);
rho = sqrtf(1 + s * s);
denom = 1 + beta * s * s;
- return cpackf((beta * rho * s) / denom, t / denom);
+ return CMPLXF((beta * rho * s) / denom, t / denom);
}