| 1 | #include "complex_impl.h" |
| 2 | |
| 3 | #if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024 |
| 4 | long double complex cacosl(long double complex z) |
| 5 | { |
| 6 | return cacos(z); |
| 7 | } |
| 8 | #else |
| 9 | // FIXME |
| 10 | #define PI_2 1.57079632679489661923132169163975144L |
| 11 | long double complex cacosl(long double complex z) |
| 12 | { |
| 13 | z = casinl(z); |
| 14 | return CMPLXL(PI_2 - creall(z), -cimagl(z)); |
| 15 | } |
| 16 | #endif |