1 files changed, 12 insertions, 0 deletions
diff --git a/lib/libm/ccos.c b/lib/libm/ccos.c
new file mode 100644
index 00000000..d5a8600d
--- /dev/null
+++ b/lib/libm/ccos.c
@@ -0,0 +1,12 @@
+#include <math.h>
+#include <complex.h>
+#include "__complex.h"
+
+double complex ccos(double complex z)
+{
+	double ch, sh;
+
+	cchsh(cimag(z), &ch, &sh);
+
+	return cos(creal(z)) * ch - (sin(creal(z)) * sh) * I;
+}