cwfoo · April 23, 2021 16:09
diff --git a/intersperse-intercalate.ml b/intersperse-intercalate.ml
 (* OCaml implementation of Haskell's Data.List intersperse and intercalate. *)

 let rec intersperse sep ls =
    match ls with
    | [] | [_] -> ls
    | x::xs -> x :: sep :: intersperse sep xs

 let intercalate = String.concat
	(* OCaml implementation of Haskell's Data.List intersperse and intercalate. *)

	let rec intersperse sep ls =
	match ls with
	\| [] \| [_] -> ls
	\| x::xs -> x :: sep :: intersperse sep xs

	let intercalate = String.concat