github.com/afumu/libc@v0.0.6/musl/src/complex/cacosl.c (about) 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