1#include "complex_impl.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}