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

3 lines
45 B
Haskell

fac x | x==0 = 1
| x>0 = x * fac (x-1)