1 files changed, 9 insertions, 0 deletions
diff --git a/lib/libm/csinl.c b/lib/libm/csinl.c
new file mode 100644
index 00000000..df049bcc
--- /dev/null
+++ b/lib/libm/csinl.c
@@ -0,0 +1,9 @@
+#include "__complex.h"
+
+long double complex csinl(long double complex z)
+{
+	long double ch, sh;
+	cchshl(cimagl(z), &ch, &sh);
+	return sinl(creall(z)) * ch +
+	       (cosl(creall(z)) * sh) * (long double complex)I;
+}