Verify.Monad_Plus
M : Interface.MONAD_PLUS
include sig ... end
val distributivity : ('a -> 'b M.t) -> 'a M.t -> 'a M.t -> bool