sig
  type elt
  type 'a container
  val length : 'Container.S0_phantom.container -> int
  val is_empty : 'Container.S0_phantom.container -> bool
  val iter :
    'Container.S0_phantom.container ->
    f:(Container.S0_phantom.elt -> unit) -> unit
  val fold :
    'Container.S0_phantom.container ->
    init:'-> f:('-> Container.S0_phantom.elt -> 'b) -> 'b
  val exists :
    'Container.S0_phantom.container ->
    f:(Container.S0_phantom.elt -> bool) -> bool
  val for_all :
    'Container.S0_phantom.container ->
    f:(Container.S0_phantom.elt -> bool) -> bool
  val find :
    'Container.S0_phantom.container ->
    f:(Container.S0_phantom.elt -> bool) -> Container.S0_phantom.elt option
  val to_list :
    'Container.S0_phantom.container -> Container.S0_phantom.elt list
  val to_array :
    'Container.S0_phantom.container -> Container.S0_phantom.elt array
end