[Haskell-cafe] out-commented code vs. case with redundant pattern matches