sig val ( <|> ) : 'Array.t -> int * int -> 'Array.t end