cimag
double cimag(double complex) __pure2;
#define cimag(x) __tg_simple(x, cimag)
y = cimag(z);
return (CMPLX(copysign(creal(w), x), copysign(cimag(w), y)));
double complex w = casinh(CMPLX(cimag(z), creal(z)));
return (CMPLX(cimag(w), creal(w)));
y = cimag(z);
rx = fabs(cimag(w));
ry = cimag(w);
return (CMPLX(fabs(ry), copysign(rx, cimag(z))));
y = cimag(z);
y = cimag(z);
double complex w = catanh(CMPLX(cimag(z), creal(z)));
return (CMPLX(cimag(w), creal(w)));
y = cimag(z);
return (atan2(cimag(z), creal(z)));
return (ccosh(CMPLX(-cimag(z), creal(z))));
y = cimag(z);
return (CMPLX(creal(z), cimag(z) * copysign(1, x)));
y = cimag(z);
y = cimag(z);
return (CMPLX(creal(z), -cimag(z)));
y = cimag (z);
if (!isinf(creal(z)) && !isinf(cimag(z)))
return (CMPLX(INFINITY, copysign(0.0, cimag(z))));
z = csinh(CMPLX(cimag(z), creal(z)));
return (CMPLX(cimag(z), creal(z)));
y = cimag(z);
return (CMPLX(creal(z) * copysign(1, x), cimag(z)));
b = cimag(z);
b = cimag(z);
z = ctanh(CMPLX(cimag(z), creal(z)));
return (CMPLX(cimag(z), creal(z)));
y = cimag(z);
return hypot(creal(z), cimag(z));
"conj(%#.2g + %#.2gI): wrong value", creal(in), cimag(in));
cimag(in), fetestexcept(FE_ALL_EXCEPT));
"conjl(%#.2g + %#.2gI): wrong value", creal(in), cimag(in));
cimag(in), fetestexcept(FE_ALL_EXCEPT));
static double (*libcimag)(double complex) = cimag;
__imag__ expected = -cimag(in);
"conjf(%#.2g + %#.2gI): wrong value", creal(in), cimag(in)
cimag(in), fetestexcept(FE_ALL_EXCEPT));
debug("%a %a\n", creal(z), cimag(z));
debug("%a %a\n", creal(ctanhf(z)), cimag(ctanhf(z)));
fpequal_cs(cimag(_x), cimag(_y), (checksign & CS_IMAG) != 0); \
fpequal_tol(cimag(_x), cimag(_y), tol, flags)); \
TGMACRO_COMPLEX_REAL_RET(cimag)
PASS_REAL_ARG_REAL_RET_(cimag, _complex) &&
PASS_COMPLEX_ARG_REAL_RET(cimag));