sig
  val to_seq : 'a IArray.t -> 'a Sequence.t
  val of_seq : 'a Sequence.t -> 'a IArray.t
end