Skip to content

Instantly share code, notes, and snippets.

What would you like to do?
-- This is a test of Gist.
fact :: Integer -> Integer
fact 0 = 1
fact n = n * fact (n-1)
main = putStrLn (show (fact 100))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment