[project @ 2002-05-31 12:22:33 by panne]

[ghc-base.git] / Text / ParserCombinators / Parsec / examples / tiger / fac.tig

let function fact(n : int) : int = 
      if n < 1 then 1 else (n * fact(n - 1))
 in fact(10)
end