creall
long double creall(long double complex);
LDBL_PROTO_NORMAL(creall);
w = (PIO2L - creall(w)) - cimagl(w) * I;
zz = 1.0L - creall(zz) - cimagl(zz) * I;
x = creall(z);
x = creall(z);
x = creall(z);
w = cosl(creall(z)) * ch + (-sinl(creall(z)) * sh) * I;
r = expl(creall(z));
rr = atan2l(cimagl(z), creall(z));
x = creall(z);
DEF_STD(creall);
x = creall(z);
w = sinl(creall(z)) * ch + (cosl(creall(z)) * sh) * I;
x = creall(z);
x = creall(z);
x = creall(z);
x = fabsl(2.0L * creall(z));
static long double (*libcreall)(long double complex) = creall;
ATF_CHECK(creall(t_csqrt(CMPLXL(INFINITY, NAN))) == INFINITY);
ATF_CHECK(isnan(creall(t_csqrt(CMPLXL(-INFINITY, NAN)))));
ATF_CHECK_EQ(creall(result), ldexpl(14 * 0x1p-4, exp / 2));
ATF_CHECK_EQ(creall(result), ldexpl(5 * 0x1p-3, exp / 2));
ATF_CHECK_EQ(creall(result), ldexpl(15 * 0x1p-4, exp / 2));
CHECK_FPEQUAL(x, creall(result));
creall(_d), cimagl(_d), creall(result), cimagl(result)); \
creall(z), cimagl(z), creall(result), cimagl(result)); \
creall(_d), cimagl(_d), creall(result), cimagl(result)); \
creall(z), cimagl(z), creall(result), cimagl(result)); \
return (fpequal_cs(creall(d1), creall(d2), true) &&
#x, creall(_x), cimagl(_x), #y, creall(_y), cimagl(_y)); \
#x, creall(_x), cimagl(_x), #y, creall(_y), cimagl(_y)); \