RosettaCodeData/Task/Loop-over-multiple-arrays-simultaneously/OCaml/loop-over-multiple-arrays-simultaneously-4.ml

6 lines
104 B
OCaml
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
let () =
n_arrays_iter [a1; a2; a3] ~f:(fun l ->
List.iter print_char l;
print_newline());
;;