Add instance Monad (WrappedMonad m) to Control.Applicative (#8218)