github.com/afumu/libc@v0.0.6/musl/src/complex/cacoshf.c (about)

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