RosettaCodeData/Task/Factorial/Haskell/factorial-7.hs
2015-02-20 00:35:01 -05:00

8 lines
106 B
Haskell

{-# LANGUAGE PostfixOperators #-}
(!) 0 = 1
(!) n = n * ((n-1)!)
main = do
print (5!)
print ((4!)!)