Files
compiler-explorer/examples/ocaml/sum.ml
2018-12-15 21:31:15 +03:00

6 lines
105 B
OCaml

let sum l =
let rec sum' acc = function
| [] -> acc
| x::tl -> sum' (acc + x) tl
in sum' 0 l