Language: C C++ D Haskell Lua OCaml PHP Perl Plain Text Python Ruby Scheme Tcl let rec fact1 n = match n with 0 -> 1 | n -> n * fact1(n - 1);; print_int (fact1 5);; print_string "\n";; let rec fact2 n = if n < 2 then 1 else n * fact2(n - 1);; print_int (fact2 5);; print_string "\n";; let rec fact3 = function | 0 -> 1 | x -> x*fact3(x-1);; print_int (fact3 5);; Private [?] Run code