[Haskell-cafe] Deduce problem.