monoids-0.1.2: Data/Monoid/Additive.hs

module Data.Monoid.Additive
    ( module Data.Monoid 
    , plus
    , zero
    ) where

import Data.Monoid

infixl 6 `plus`

plus :: Monoid m => m -> m -> m 
plus = mappend

zero :: Monoid m => m 
zero = mempty