[Haskell-cafe] Data.Map.Map Pattern Matching