module type OrderedType = sig .. end
sig
end
type t
val compare : t -> t -> int
t -> t -> int
val string_of : t -> string
t -> string
val sep : string
string