Verify.Monoid
M : Interface.MONOID
include sig ... end
module I : sig ... end
val identity : M.t -> bool