RosettaCodeData/Task/Conditional-structures/Haskell/conditional-structures-4.hs

3 lines
62 B
Haskell

fac x = case x of 0 -> 1
_ -> x * fac (x-1)