#include "libm.h" | |
#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024 | |
long double complex clogl(long double complex z) | |
{ | |
return clog(z); | |
} | |
#else | |
// FIXME | |
long double complex clogl(long double complex z) | |
{ | |
long double r, phi; | |
r = cabsl(z); | |
phi = cargl(z); | |
return CMPLXL(logl(r), phi); | |
} | |
#endif |