lib/libm/csinhf.c


1
2
3
4
5
6
7
8
9
10
11
12

#include <complex.h> // for cimagf, complex, crealf, csinhf, I
#include <math.h>    // for cosf, coshf, sinf, sinhf

float complex csinhf(float complex z)
{
	float x, y;

	x = crealf(z);
	y = cimagf(z);

	return sinhf(x) * cosf(y) + (coshf(x) * sinf(y)) * I;
}