我正在读杰森的书,不太明白以下程序:
let fact2 i = let rec loop accum i = if i = 0 then accum else loop (i * accum) (i - 1) in loop 1
非常感谢!!!
ocaml tail-recursion factorial
factorial ×1
ocaml ×1
tail-recursion ×1