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