# Module type Container_intf.Container.Generic_phantom

    module type Generic_phantom = Container_intf.Generic_phantom

    type ('a, 'phantom) t

    type 'a elt

    val mem : ?equal:('a elt ->
                   'a elt -> bool) ->
           ('a, 'b) t ->
           'a elt -> bool

    val length : ('a, 'b) t -> int

    val is_empty : ('a, 'b) t -> bool

    val iter : ('a, 'b) t ->
           f:('a elt -> unit) -> unit

    val fold : ('a, 'b) t ->
           init:'accum ->
           f:('accum -> 'a elt -> 'accum) -> 'accum

    val exists : ('a, 'b) t ->
           f:('a elt -> bool) -> bool

    val for_all : ('a, 'b) t ->
           f:('a elt -> bool) -> bool

    val count : ('a, 'b) t ->
           f:('a elt -> bool) -> int

    val sum : (module Commutative_group.S with type t = 'sum) ->
           ('a, 'b) t ->
           f:('a elt -> 'sum) -> 'sum

    val find : ('a, 'b) t ->
           f:('a elt -> bool) ->
           'a elt option

    val find_map : ('a, 'c) t ->
           f:('a elt -> 'b option) -> 'b option

    val to_list : ('a, 'b) t ->
           'a elt list

    val to_array : ('a, 'b) t ->
           'a elt array

    val min_elt : ('a, 'b) t ->
           cmp:('a elt ->
                'a elt -> int) ->
           'a elt option

    val max_elt : ('a, 'b) t ->
           cmp:('a elt ->
                'a elt -> int) ->
           'a elt option