blob: 3b840339d9b1d88e4b4b06d7402ccb6d80ebb019 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
#include "__complex.h"
long double complex csinhl(long double complex z)
{
long double x, y;
x = creall(z);
y = cimagl(z);
return sinhl(x) * cosl(y) +
(coshl(x) * sinl(y)) * (long double complex)I;
}
|