Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/libraries/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