• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
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 
cacos(double complex z)7 double complex cacos(double complex z)
8 {
9 	z = casin(z);
10 	return CMPLX(M_PI_2 - creal(z), -cimag(z));
11 }
12