Safe Haskell | None |
---|---|
Language | Haskell2010 |
Synopsis
- data AlonzoLEDGER era
- ledgerTransition :: forall (someLEDGER :: Type -> Type ) era. ( Signal (someLEDGER era) ~ Tx era, State (someLEDGER era) ~ LedgerState era, Environment (someLEDGER era) ~ LedgerEnv era, Embed ( EraRule "UTXOW" era) (someLEDGER era), Embed ( EraRule "DELEGS" era) (someLEDGER era), Environment ( EraRule "DELEGS" era) ~ DelegsEnv era, State ( EraRule "DELEGS" era) ~ DPState ( Crypto era), Signal ( EraRule "DELEGS" era) ~ Seq ( DCert ( Crypto era)), Environment ( EraRule "UTXOW" era) ~ UtxoEnv era, State ( EraRule "UTXOW" era) ~ UTxOState era, Signal ( EraRule "UTXOW" era) ~ Tx era, HasField "certs" ( TxBody era) ( StrictSeq ( DCert ( Crypto era))), HasField "isValid" ( Tx era) IsValid , Era era) => TransitionRule (someLEDGER era)
Documentation
data AlonzoLEDGER era Source #
The uninhabited type that marks the (STS Ledger) instance in the Alonzo Era.
Instances
ledgerTransition :: forall (someLEDGER :: Type -> Type ) era. ( Signal (someLEDGER era) ~ Tx era, State (someLEDGER era) ~ LedgerState era, Environment (someLEDGER era) ~ LedgerEnv era, Embed ( EraRule "UTXOW" era) (someLEDGER era), Embed ( EraRule "DELEGS" era) (someLEDGER era), Environment ( EraRule "DELEGS" era) ~ DelegsEnv era, State ( EraRule "DELEGS" era) ~ DPState ( Crypto era), Signal ( EraRule "DELEGS" era) ~ Seq ( DCert ( Crypto era)), Environment ( EraRule "UTXOW" era) ~ UtxoEnv era, State ( EraRule "UTXOW" era) ~ UTxOState era, Signal ( EraRule "UTXOW" era) ~ Tx era, HasField "certs" ( TxBody era) ( StrictSeq ( DCert ( Crypto era))), HasField "isValid" ( Tx era) IsValid , Era era) => TransitionRule (someLEDGER era) Source #
An abstract Alonzo Era, Ledger transition. Fix
someLedger
at a concrete type to
make it concrete. Depends only on the "certs" and "isValid" HasField instances.