[Haskell-cafe] Why this doesn't work?