retval = ((signbit (__real__ x) ? 0.0 : HUGE_VAL) * (__cos (__imag__ x) + 1i * __sin (__imag__ x)));
{ double value = signbit (__real__ x) ? 0.0 : HUGE_VAL;  __real__ retval = value * __cos (__imag__ x); __imag__ retval = value * __sin (__imag__ x); }
__cexp (__complex__ double x){  __complex__ double retval;  if (isfinite (__real__ x))    {      if (isfinite (__imag__ x))	{	  retval = __exp (__real__ x) * (__cos (__imag__ x)					 + 1i * __sin (__imag__ x));	}      else	/* If the imaginary part is +-inf or NaN and the real part is	   not +-inf the result is NaN + iNan.  */	retval = __nan ("") + 1.0i * __nan ("");    }  else if (__isinf (__real__ x))    {      if (isfinite (__imag x))	{	  if (signbit (__real__ x) == 0 && __imag__ x == 0.0)	    retval = HUGE_VAL;	  else	    retval = ((signbit (__real__ x) ? 0.0 : HUGE_VAL)		      * (__cos (__imag__ x) + 1i * __sin (__imag__ x)));	}      else if (signbit (__real__ x))	retval = HUGE_VAL + 1.0i * __nan ("");      else	retval = 0.0;    }  else    /* If the real part is NaN the result is NaN + iNan.  */    retval = __nan ("") + 1.0i * __nan ("");  return retval;}