sig   type 'a t   val create : unit -> 'Vector.t   val length : 'Vector.t -> int   val size : 'Vector.t -> int   val get : 'Vector.t -> int -> 'a   val set : 'Vector.t -> int -> '-> unit   val add : 'Vector.t -> '-> unit   val addi : 'Vector.t -> '-> int   val clear : 'Vector.t -> unit   val iter : ('-> unit) -> 'Vector.t -> unit   val iteri : (int -> '-> unit) -> 'Vector.t -> unit   val map : ('-> 'b) -> 'Vector.t -> 'Vector.t   val mapi : (int -> '-> 'b) -> 'Vector.t -> 'Vector.t   val find : 'Vector.t -> ?default:'-> ?exn:exn -> int -> 'a   val update : 'Vector.t -> default:'-> int -> '-> unit   val to_array : 'Vector.t -> 'a array   val of_array : 'a array -> 'Vector.t   val capacity : 'Vector.t -> int   val resize : 'Vector.t -> int -> unit   val shrink : 'Vector.t -> unit end