module type OrderedType = sig .. end
sig
end
include Set.OrderedType
val to_string : t -> string
t -> string