fix the use of uninitialized value in regcomp
[musl.git] / src / complex / cacos.c
blob27c356364c8c6ffe438767352195e791ed03a23f
1 #include "libm.h"
3 // FIXME: Hull et al. "Implementing the complex arcsine and arccosine functions using exception handling" 1997
5 /* acos(z) = pi/2 - asin(z) */
7 double complex cacos(double complex z)
9 z = casin(z);
10 return CMPLX(M_PI_2 - creal(z), -cimag(z));