新学习OCaml并且似乎没有得到如何解决我在网上找到的这个问题。
(* Remove contiguous duplicates from a lost *)
# let rec destutter list =
match list with
| [] -> []
| hd1 :: hd2 :: tl ->
if hd1 = hd2 then destutter (hd2 :: tl)
else hd1 :: destutter (hd2 :: tl)
;;
我要列举所有案例,但不知道如何解决这个问题。
答案 0 :(得分:3)
知道了。
{{1}}