AmountPriceDebug :: Maybe AmountPrice -> String
showAmountPriceDebug Nothing                = ""
sho
showAmountPriceDebug :: Maybe AmountPrice -> String
showAmountPriceDebug Nothing                = ""
showAmountPriceDebug Nothing                = ""