ML (1973)

#let rec fact n = if n = 0 then 1 else n * fact(n - 1) in

fact 6;;