Add an implementation of the factorial algorithm in Haskell.

diff --git a/Fact.hs b/Fact.hs
new file mode 100644 (file)
index 0000000..491ffc9
--- /dev/null
+++ b/Fact.hs
@@ -0,0 +1,2 @@
+fact 0 = 1
+fact n = n * (fact (n - 1))