Module Monoid.V

module I : sig ... end
val identity : Bool.Disjunctive.Monoid.t -> bool