1 2 3 4 5 6
#include <complex.h> // for I, catanhl, catanl, complex long double complex catanhl(long double complex z) { return -I * catanl(z * I); }