musl/src/complex/csinf.c

8 lines
143 B
C

#include "libm.h"
float complex csinf(float complex z)
{
z = csinhf(CMPLXF(-cimagf(z), crealf(z)));
return CMPLXF(cimagf(z), -crealf(z));
}