Gitiles
Code Review
Sign In
gerrit-public.fairphone.software
/
platform
/
external
/
musl
/
d41cdef9198e635270d30e82be939d4ea0cbce82
/
.
/
src
/
complex
/
casinh.c
blob: b57fe8c40ba3bfe94047e8af1f17b12ff9e4dd89 [
file
] [
log
] [
blame
]
#include
"libm.h"
/* asinh(z) = -i asin(i z) */
double
complex casinh
(
double
complex z
)
{
z
=
casin
(
CMPLX
(-
cimag
(
z
),
creal
(
z
)));
return
CMPLX
(
cimag
(
z
),
-
creal
(
z
));
}