[Haskell-cafe] conflicting variable definitions in pattern