diff options
Diffstat (limited to 'lib/libm/ccoshl.c')
| -rw-r--r-- | lib/libm/ccoshl.c | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/lib/libm/ccoshl.c b/lib/libm/ccoshl.c new file mode 100644 index 00000000..ba680068 --- /dev/null +++ b/lib/libm/ccoshl.c @@ -0,0 +1,12 @@ +#include <math.h> +#include <complex.h> + +long double complex ccoshl(long double complex z) +{ + long double x, y; + + x = creall(z); + y = cimagl(z); + + return coshl(x) * cosl(y) + (sinhl(x) * sinl(y)) * I; +} |
