[Haskell-beginners] Double usage of a wire (arrow)