Untitled
unknown
ocaml
3 years ago
97 B
5
Indexable
let rec sum_tree = function | Lf -> 0 | Br (v, t1, t2) -> v + sum_tree(t1) + sum_tree(t2);;
Editor is loading...
let rec sum_tree = function | Lf -> 0 | Br (v, t1, t2) -> v + sum_tree(t1) + sum_tree(t2);;