[Haskell-beginners] problem exercise 3 page 60 Programming in Haskell