module Data.Monoid.Multiplicative.Sugar ( module Data.Monoid.Additive.Sugar , module Data.Monoid.Multiplicative , (*) ) where import Data.Monoid.Additive.Sugar import Data.Monoid.Multiplicative import Prelude hiding ((*)) infixl 7 * (*) :: MultiplicativeMonoid r => r -> r -> r (*) = times