diff options
Diffstat (limited to 'lib/libm/ccosl.c')
| -rw-r--r-- | lib/libm/ccosl.c | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/lib/libm/ccosl.c b/lib/libm/ccosl.c new file mode 100644 index 00000000..ee2a3fc0 --- /dev/null +++ b/lib/libm/ccosl.c @@ -0,0 +1,8 @@ +#include "__complex.h" + +long double complex ccosl(long double complex z) +{ + long double ch, sh; + cchshl(cimagl(z), &ch, &sh); + return cosl(creall(z)) * ch - (sinl(creall(z)) * sh) * I; +} |
