[Haskell-beginners] Doing IO in terms of Arrow