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