Added MonadEvent instance for... Event.