let combine = fun a1 a2 ->
      if Array.length a1 <> Array.length a2 then
        invalid_arg "Misc.Array.combine: arrays don't have same size";
      Array.init (Array.length a1) (fun i -> (a1.(i), a2.(i)))