let inconsistent_2arrays ar1 ar2 = try let acc = Array.fold_left inconsistent_aux ([], [], [], [], [], [], []) ar1 in let _ = Array.fold_left inconsistent_aux acc ar2 in false with Exit -> true