-- ----------------------------------------------------------------------------
-- Transaction fees
--
data TxFee era where
TxFeeImplicit :: TxFeesImplicitInEra era -> TxFee era
TxFeeExplicit :: TxFeesExplicitInEra era -> Lovelace -> TxFee era
deriving instance Eq (TxFee era)
deriving instance Show (TxFee era)