module type S = sig .. end
sig
end
SetWithNearest.Make
include Set.S
val nearest_elt_le : elt -> t -> elt
elt -> t -> elt
val nearest_elt_ge : elt -> t -> elt