sig
  type 'a sequence = ('a -> unit) -> unit
  type 'a t = private { mutable size : int; mutable vec : 'a array; }
  val is_empty : 'a OLinq_vec.t -> bool
  val length : 'a OLinq_vec.t -> int
  val return : 'a -> 'a OLinq_vec.t
  val create : unit -> 'a OLinq_vec.t
  val push : 'a OLinq_vec.t -> 'a -> unit
  val init : int -> (int -> 'a) -> 'a OLinq_vec.t
  val get : 'a OLinq_vec.t -> int -> 'a
  val set : 'a OLinq_vec.t -> int -> 'a -> unit
  val map : ('a -> 'b) -> 'a OLinq_vec.t -> 'b OLinq_vec.t
  val flat_map_seq :
    ('a -> 'b OLinq_vec.sequence) -> 'a OLinq_vec.t -> 'b OLinq_vec.t
  val fold : ('a -> 'b -> 'a) -> 'a -> 'b OLinq_vec.t -> 'a
  val iteri : f:(int -> 'a -> unit) -> 'a OLinq_vec.t -> unit
  val append_seq : 'a OLinq_vec.t -> 'a OLinq_vec.sequence -> unit
  val of_seq : 'a OLinq_vec.sequence -> 'a OLinq_vec.t
  val of_list : 'a list -> 'a OLinq_vec.t
  val of_array : 'a array -> 'a OLinq_vec.t
  val to_seq : 'a OLinq_vec.t -> 'a OLinq_vec.sequence
  val to_list : 'a OLinq_vec.t -> 'a list
  val to_array : 'a OLinq_vec.t -> 'a array
end