Meg's Mirrors

zig

1	#include "complex_impl.h"
2
3	float complex catanhf(float complex z)
4	{
5	z = catanf(CMPLXF(-cimagf(z), crealf(z)));
6	return CMPLXF(cimagf(z), -crealf(z));
7	}