catanh

double complex catanh(double complex z);

calculate the complex arc hyperbolic tangent

#include <stdio.h>
#include <complex.h>
 
int main( void )
{
 
   long double complex zlong=4.2 + I*2.34;
   double complex zdouble=(double complex)zlong;
 
   double result;
 
   result = catanh(zdouble);
   printf("catanh(%f + I*%f) = %f\n", creal(zdouble), cimag(zdouble), result);
   return 0;
}

  catanh(4.200000 + I*2.340000) = 0.181767