[Haskell-beginners] Using monad with arrow