RosettaCodeData/Task/Doubly-linked-list-Element-insertion/OCaml/doubly-linked-list-element-insertion-3.ml
2024-10-16 18:07:41 -07:00

2 lines
106 B
OCaml

(* val insert : 'a nav_list -> 'a -> 'a nav_list *)
let insert (prev, cur, next) v = (prev, cur, v::next)