module Array: sig .. end
sig
end
val set : 'a array -> int -> 'a -> unit
'a array -> int -> 'a -> unit