Module Sets.Concrete_ident

include sig ... end
class 's monoid : object ... end