Module type Base__Set.Compare_m