Data update
This commit is contained in:
parent
81fd053722
commit
52a6ef48dd
10248 changed files with 63654 additions and 6775 deletions
9
Task/Stem-and-leaf-plot/OCaml/stem-and-leaf-plot-1.ml
Normal file
9
Task/Stem-and-leaf-plot/OCaml/stem-and-leaf-plot-1.ml
Normal file
|
|
@ -0,0 +1,9 @@
|
|||
let unique li =
|
||||
let rec aux acc = function
|
||||
| [] -> (List.rev acc)
|
||||
| x::xs ->
|
||||
if List.mem x acc
|
||||
then aux acc xs
|
||||
else aux (x::acc) xs
|
||||
in
|
||||
aux [] li
|
||||
Loading…
Add table
Add a link
Reference in a new issue