[project @ 2003-07-31 10:48:50 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