module Control.Monad.IO where

import           Control.Monad.Trans

io :: MonadIO m => IO a -> m a
io = liftIO