RosettaCodeData/Task/Factorial/Haskell/factorial-7.hs

4 lines
84 B
Haskell

factorial :: Integral -> Integral
factorial 0 = 1
factorial n = n * factorial (n-1)