[Haskell-beginners] Early return in IO monad