sig val merge_sort : (int -> int -> int) -> int array -> unit val ba_merge_sort : (int64 -> int64 -> int) -> (int64, Bigarray.int64_elt, Bigarray.c_layout) Bigarray.Array1.t -> unit end
