RosettaCodeData/Task/Factorial/OCaml/factorial-1.ocaml

4 lines
68 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
let rec factorial n =
if n <= 0 then 1
else n * factorial (n-1)