[Haskell-cafe] Equational Reasoning goes wrong