[Haskell-cafe] Problem with a sample from RWH