src/complex/cacoshf.c

   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 }