# Module type Core_set_intf.Creators1

    module type Creators1 = sig .. end

    type ('a, 'cmp) set

    type 'a t

    type 'a tree

    type comparator_witness

    val empty : 'a t

    val singleton : 'a -> 'a t

    val union_list : 'a t list -> 'a t

    val of_list : 'a list -> 'a t

    val of_array : 'a array -> 'a t

    val of_sorted_array : 'a array -> 'a t Or_error.t

    val of_sorted_array_unchecked : 'a array -> 'a t

    val stable_dedup_list : 'a list -> 'a list

    val map : ('a, 'c) set ->
           f:('a -> 'b) -> 'b t

    val filter_map : ('a, 'c) set ->
           f:('a -> 'b option) -> 'b t

    val of_tree : 'a tree -> 'a t

    val of_map_keys : ('a, 'b, comparator_witness) Map.t ->
           'a t