 Negate mixed amount's quantities (and total prices, if any).
maNegate :: MixedAmount -> MixedAmount
maNegate = transformMixedAmount negate

--
maNegate :: MixedAmount -> MixedAmount
maNegate = transformMixedAmount negate
maNegate = transformMixedAmount negate