creal
double creal(double complex);
#define creal(a) __TG_CFN1(creal, (a))
w = (M_PI_2 - creal(w)) - cimag(w) * I;
zz = 1.0 - creal(zz) - cimag(zz) * I;
x = creal(z);
x = creal(z);
x = creal(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)));
x = creal(z);
ry = creal(w) + m_ln2;
rx = creal(w);
x = creal(z);
x = creal(z);
double complex w = catanh(CMPLX(cimag(z), creal(z)));
return (CMPLX(cimag(w), creal(w)));
w = cos(creal(z)) * ch - (sin(creal(z)) * sh) * I;
x = creal(z);
x = fabs(2.0 * creal(z));
x = creal(z);
rr = atan2(cimag(z), creal(z));
x = creal(z);
if (isinf(creal(z)) || isinf(cimag(z))) {
w = sin(creal(z)) * ch + (cos(creal(z)) * sh) * I;
x = creal(z);
x = creal (z);
d = cos(2.0 * creal(z)) + cosh(2.0 * cimag(z));
w = sin(2.0 * creal(z)) / d + (sinh(2.0 * cimag(z)) / d) * I;
x = creal(z);
ATF_CHECK_MSG(crude_equality(creal(ci),creal(b)) && \
creal(a), cimag(a), creal(ci), cimag(ci), creal(b), cimag(b)); \