lib/libm/csinh.c


1
2
3
4
5
6
7
8
9
10
11

#include "__complex.h"

double complex csinh(double complex z)
{
	double x, y;

	x = creal(z);
	y = cimag(z);

	return sinh(x) * cos(y) + (cosh(x) * sin(y)) * (double complex)I;
}