RosettaCodeData/Task/Factorial/Standard-ML/factorial-1.ml

4 lines
64 B
OCaml

fun factorial n =
if n <= 0 then 1
else n * factorial (n-1)