2d72b580
b69f695a
cfbaba79
1
2 3 4 5 6 7
8
9
#include "complex_impl.h" /* acosh(z) = i acos(z) */ double complex cacosh(double complex z) { z = cacos(z); return CMPLX(-cimag(z), creal(z)); }