use __expo2 in sinh and cosh, move __cexp to cmath
[libm] / src / cmath / csinl.c
1 #include "libm.h"
2
3 #if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
4 long double complex csinl(long double complex z)
5 {
6         return csin(z);
7 }
8 #else
9 long double complex csinl(long double complex z)
10 {
11         z = csinhl(cpackl(-cimagl(z), creall(z)));
12         return cpackl(cimagl(z), -creall(z));
13 }
14 #endif