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

9 lines
106 B
Haskell
Raw Permalink Normal View History

2015-02-20 00:35:01 -05:00
{-# LANGUAGE PostfixOperators #-}
(!) 0 = 1
(!) n = n * ((n-1)!)
main = do
print (5!)
print ((4!)!)