module type Map_and_set_binable = Comparable_intf.Map_and_set_binabletype t
include Comparator.S_binable
module Map:Map.S_binablewith type Key.t = twith type Key.comparator = comparator
module Set:Set.S_binablewith type Elt.t = twith type Elt.comparator = comparator