[Haskell-cafe] Map Monoid instance (was commutative monoid?)