5 lines
96 B
OCaml
5 lines
96 B
OCaml
|
let rec grow (xs: int list): int =
|
||
|
|
match xs with
|
||
|
|
| [] -> 1
|
||
|
|
| x :: v -> x * (grow v);;
|