====== catanh ======
<code c>
double complex catanh(double complex z);
</code>

==== description of catanh ====
calculate the complex arc hyperbolic tangent

<code c>
#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;
}
</code>

===== output of catanh c example =====
    catanh(4.200000 + I*2.340000) = 0.181767