#include "complex_impl.h" /* sin(z) = -i sinh(i z) */ double complex csin(double complex z) { z = csinh(CMPLX(-cimag(z), creal(z))); return CMPLX(cimag(z), -creal(z)); } #ifdef TEST int main(void) { return 0; } #endif