cimagl
long double cimagl(long double complex);
LDBL_PROTO_NORMAL(cimagl);
w = (PIO2L - creall(w)) - cimagl(w) * I;
zz = 1.0L - creall(zz) - cimagl(zz) * I;
y = cimagl(z);
y = cimagl(z);
y = cimagl(z);
cchshl(cimagl(z), &ch, &sh);
w = r * cosl(cimagl(z)) + (r * sinl(cimagl(z))) * I;
DEF_STD(cimagl);
rr = atan2l(cimagl(z), creall(z));
y = cimagl(z);
y = cimagl(z);
cchshl(cimagl(z), &ch, &sh);
y = cimagl(z);
y = cimagl(z);
y = cimagl(z);
y = fabsl(2.0L * cimagl(z));
static long double (*libcimagl)(long double complex) = cimagl;
ATF_CHECK(isnan(cimagl(t_csqrt(CMPLXL(INFINITY, NAN)))));
ATF_CHECK(isinf(cimagl(t_csqrt(CMPLXL(-INFINITY, NAN)))));
ATF_CHECK_EQ(cimagl(result), ldexpl(9 * 0x1p-4, exp / 2));
ATF_CHECK_EQ(cimagl(result), ldexpl(6 * 0x1p-3, exp / 2));
ATF_CHECK_EQ(cimagl(result), 0);
CHECK_FPEQUAL(x, cimagl(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)); \
fpequal_cs(cimagl(d1), cimagl(d2), true));
#x, creall(_x), cimagl(_x), #y, creall(_y), cimagl(_y)); \
#x, creall(_x), cimagl(_x), #y, creall(_y), cimagl(_y)); \