fact :: Integer -> Integer fact n | n == 0 = 1 | n /= 0 = n * fact (n-1) main = do putStrLn "The factorial of 5 is:" print (fact 5)
We use cookies to provide and improve our services. By using our site, you consent to our Cookies Policy. Accept Learn more