[Haskell-beginners] question, chapter 10 Real World Haskell