1#include "libm.h" 2 3// FIXME: Hull et al. "Implementing the complex arcsine and arccosine functions using exception handling" 1997 4 5/* acos(z) = pi/2 - asin(z) */ 6 7double complex cacos(double complex z) 8{ 9 z = casin(z); 10 return CMPLX(M_PI_2 - creal(z), -cimag(z)); 11} 12