module type Map_and_set_binable = Comparable_intf.Map_and_set_binabletype t
include Comparator.S
module Map:Core_map.S_binablewith type Key.t = twith type Key.comparator_witness = comparator_witness
module Set:Core_set.S_binablewith type Elt.t = twith type Elt.comparator_witness = comparator_witness