{-# htermination liftM :: (a -> b) -> (IO a -> IO b) #-} import Monad
content may be truncated. 'popout' for larger text window.