fact :: Int -> Int fact 0 = 1 fact n = 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