diff --git a/programs/develop/ktcc/trunk/libc.obj/source/math/tan.asm b/programs/develop/ktcc/trunk/libc.obj/source/math/tan.asm
new file mode 100644
index 0000000000..0cdf5c4cee
--- /dev/null
+++ b/programs/develop/ktcc/trunk/libc.obj/source/math/tan.asm
@@ -0,0 +1,10 @@
+format COFF
+section '.text'
+
+public _tan as "tan"
+
+_tan:
+    fld qword[esp+4]
+    fptan
+    fxch
+    ret