• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 #include "complex_impl.h"
2 
cacoshf(float complex z)3 float complex cacoshf(float complex z)
4 {
5 	int zineg = signbit(cimagf(z));
6 
7 	z = cacosf(z);
8 	if (zineg) return CMPLXF(cimagf(z), -crealf(z));
9 	else       return CMPLXF(-cimagf(z), crealf(z));
10 }
11