exo
This commit is contained in:
7
algo/ocaml/cours.ml
Normal file
7
algo/ocaml/cours.ml
Normal file
@@ -0,0 +1,7 @@
|
||||
(*3 : construire une liste*)
|
||||
|
||||
let rec f = function
|
||||
0->[]
|
||||
|n -> n::f(n-1);;
|
||||
(*val f:int -> int list =<fun>*)
|
||||
|
||||
Reference in New Issue
Block a user