[Haskell-cafe] Free monoids in Haskell