[Haskell-cafe] Fighting the monad stack, MonadIO