| Safe Haskell | None |
|---|---|
| Language | Haskell2010 |
Cardano.Ledger.Conway.State
Synopsis
- module Cardano.Ledger.Babbage.State
- data ConwayAccountState era = ConwayAccountState {}
- newtype ConwayAccounts era = ConwayAccounts {
- caStates ∷ Map (Credential 'Staking) (ConwayAccountState era)
- class EraAccounts era ⇒ ConwayEraAccounts era where
- mkConwayAccountState ∷ CompactForm Coin → AccountState era
- dRepDelegationAccountStateL ∷ Lens' (AccountState era) (Maybe DRep)
- accountStateDelegatee ∷ ConwayEraAccounts era ⇒ AccountState era → Maybe Delegatee
- registerConwayAccount ∷ ConwayEraAccounts era ⇒ Credential 'Staking → CompactForm Coin → Maybe Delegatee → Accounts era → Accounts era
- unregisterConwayAccount ∷ EraAccounts era ⇒ Credential 'Staking → Accounts era → (Maybe (AccountState era), Accounts era)
- lookupDRepDelegation ∷ ConwayEraAccounts era ⇒ Credential 'Staking → Accounts era → Maybe DRep
- epochStateRegDrepL ∷ ConwayEraCertState era ⇒ Lens' (EpochState era) (Map (Credential 'DRepRole) DRepState)
- data ConwayCertState era = ConwayCertState {
- conwayCertVState ∷ !(VState era)
- conwayCertPState ∷ !(PState era)
- conwayCertDState ∷ !(DState era)
- class (EraCertState era, ConwayEraAccounts era) ⇒ ConwayEraCertState era where
- certVStateL ∷ Lens' (CertState era) (VState era)
- csCommitteeCredsL ∷ ∀ era f. Functor f ⇒ (Map (Credential 'ColdCommitteeRole) CommitteeAuthorization → f (Map (Credential 'ColdCommitteeRole) CommitteeAuthorization)) → CommitteeState era → f (CommitteeState era)
- mkConwayCertState ∷ ConwayEraCertState era ⇒ VState era → PState era → DState era → CertState era
- conwayCertDStateL ∷ ∀ era f. Functor f ⇒ (DState era → f (DState era)) → ConwayCertState era → f (ConwayCertState era)
- conwayCertPStateL ∷ ∀ era f. Functor f ⇒ (PState era → f (PState era)) → ConwayCertState era → f (ConwayCertState era)
- conwayCertVStateL ∷ ∀ era f. Functor f ⇒ (VState era → f (VState era)) → ConwayCertState era → f (ConwayCertState era)
- conwayObligationCertState ∷ ConwayEraCertState era ⇒ CertState era → Obligations
- conwayCertsTotalDepositsTxBody ∷ ∀ era (l ∷ TxLevel). EraTxBody era ⇒ PParams era → ConwayCertState era → TxBody l era → Coin
- conwayCertsTotalRefundsTxBody ∷ ∀ era (l ∷ TxLevel). (EraTxBody era, EraAccounts era) ⇒ PParams era → ConwayCertState era → TxBody l era → Coin
- newtype ConwayInstantStake era = ConwayInstantStake {}
- conwayInstantStakeCredentialsL ∷ ∀ era f. Functor f ⇒ (Map (Credential 'Staking) (CompactForm Coin) → f (Map (Credential 'Staking) (CompactForm Coin))) → ConwayInstantStake era → f (ConwayInstantStake era)
- addConwayInstantStake ∷ EraTxOut era ⇒ UTxO era → ConwayInstantStake era → ConwayInstantStake era
- deleteConwayInstantStake ∷ EraTxOut era ⇒ UTxO era → ConwayInstantStake era → ConwayInstantStake era
- resolveConwayInstantStake ∷ (EraStake era, InstantStake era ~ ConwayInstantStake era) ⇒ ConwayInstantStake era → Accounts era → Stake
- data VState era = VState {
- vsDReps ∷ !(Map (Credential 'DRepRole) DRepState)
- vsCommitteeState ∷ !(CommitteeState era)
- vsNumDormantEpochs ∷ !EpochNo
- vsDRepsL ∷ ∀ era f. Functor f ⇒ (Map (Credential 'DRepRole) DRepState → f (Map (Credential 'DRepRole) DRepState)) → VState era → f (VState era)
- vsCommitteeStateL ∷ ∀ era f. Functor f ⇒ (CommitteeState era → f (CommitteeState era)) → VState era → f (VState era)
- vsNumDormantEpochsL ∷ ∀ era f. Functor f ⇒ (EpochNo → f EpochNo) → VState era → f (VState era)
- vsActualDRepExpiry ∷ Credential 'DRepRole → VState era → Maybe EpochNo
- lookupDepositVState ∷ VState era → Credential 'DRepRole → Maybe Coin
- unDelegReDelegDRep ∷ ConwayEraAccounts era ⇒ Credential 'Staking → AccountState era → Maybe DRep → VState era → VState era
Documentation
module Cardano.Ledger.Babbage.State
data ConwayAccountState era Source #
Constructors
| ConwayAccountState | |
Fields
| |
Instances
newtype ConwayAccounts era Source #
Constructors
| ConwayAccounts | |
Fields
| |
Instances
| ToJSON (ConwayAccounts era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Account Methods toJSON ∷ ConwayAccounts era → Value Source # toEncoding ∷ ConwayAccounts era → Encoding Source # toJSONList ∷ [ConwayAccounts era] → Value Source # toEncodingList ∷ [ConwayAccounts era] → Encoding Source # omitField ∷ ConwayAccounts era → Bool Source # | |||||
| Typeable era ⇒ DecShareCBOR (ConwayAccounts era) Source # | |||||
| EncCBOR (ConwayAccounts era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Account Methods encCBOR ∷ ConwayAccounts era → Encoding Source # | |||||
| Default (ConwayAccounts era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Account Methods def ∷ ConwayAccounts era Source # | |||||
| NFData (ConwayAccounts era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Account Methods rnf ∷ ConwayAccounts era → () # | |||||
| Generic (ConwayAccounts era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Account Associated Types
Methods from ∷ ConwayAccounts era → Rep (ConwayAccounts era) x # to ∷ Rep (ConwayAccounts era) x → ConwayAccounts era # | |||||
| Show (ConwayAccounts era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Account Methods showsPrec ∷ Int → ConwayAccounts era → ShowS # show ∷ ConwayAccounts era → String # showList ∷ [ConwayAccounts era] → ShowS # | |||||
| Eq (ConwayAccounts era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Account Methods (==) ∷ ConwayAccounts era → ConwayAccounts era → Bool # (/=) ∷ ConwayAccounts era → ConwayAccounts era → Bool # | |||||
| NoThunks (ConwayAccounts era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Account | |||||
| type Share (ConwayAccounts era) Source # | |||||
| type Rep (ConwayAccounts era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Account type Rep (ConwayAccounts era) = D1 ('MetaData "ConwayAccounts" "Cardano.Ledger.Conway.State.Account" "cardano-ledger-conway-1.21.0.0-inplace" 'True) (C1 ('MetaCons "ConwayAccounts" 'PrefixI 'True) (S1 ('MetaSel ('Just "caStates") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map (Credential 'Staking) (ConwayAccountState era))))) | |||||
class EraAccounts era ⇒ ConwayEraAccounts era where Source #
Minimal complete definition
Methods
mkConwayAccountState ∷ CompactForm Coin → AccountState era Source #
default mkConwayAccountState ∷ AccountState era ~ ConwayAccountState era ⇒ CompactForm Coin → AccountState era Source #
dRepDelegationAccountStateL ∷ Lens' (AccountState era) (Maybe DRep) Source #
Instances
accountStateDelegatee ∷ ConwayEraAccounts era ⇒ AccountState era → Maybe Delegatee Source #
registerConwayAccount Source #
Arguments
| ∷ ConwayEraAccounts era | |
| ⇒ Credential 'Staking | |
| → CompactForm Coin | Deposit |
| → Maybe Delegatee | |
| → Accounts era | |
| → Accounts era |
unregisterConwayAccount Source #
Arguments
| ∷ EraAccounts era | |
| ⇒ Credential 'Staking | Credential to unregister |
| → Accounts era |
|
| → (Maybe (AccountState era), Accounts era) | Returns |
lookupDRepDelegation ∷ ConwayEraAccounts era ⇒ Credential 'Staking → Accounts era → Maybe DRep Source #
epochStateRegDrepL ∷ ConwayEraCertState era ⇒ Lens' (EpochState era) (Map (Credential 'DRepRole) DRepState) Source #
data ConwayCertState era Source #
Constructors
| ConwayCertState | |
Fields
| |
Instances
| ToJSON (Accounts era) ⇒ ToJSON (ConwayCertState era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.CertState Methods toJSON ∷ ConwayCertState era → Value Source # toEncoding ∷ ConwayCertState era → Encoding Source # toJSONList ∷ [ConwayCertState era] → Value Source # toEncodingList ∷ [ConwayCertState era] → Encoding Source # omitField ∷ ConwayCertState era → Bool Source # | |||||
| EraAccounts era ⇒ DecShareCBOR (ConwayCertState era) Source # | |||||
| EraAccounts era ⇒ EncCBOR (ConwayCertState era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.CertState Methods encCBOR ∷ ConwayCertState era → Encoding Source # | |||||
| ToJSON (Accounts era) ⇒ ToKeyValuePairs (ConwayCertState era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.CertState Methods toKeyValuePairs ∷ KeyValue e kv ⇒ ConwayCertState era → [kv] Source # | |||||
| Default (Accounts era) ⇒ Default (ConwayCertState era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.CertState Methods def ∷ ConwayCertState era Source # | |||||
| (Era era, NFData (Accounts era)) ⇒ NFData (ConwayCertState era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.CertState Methods rnf ∷ ConwayCertState era → () # | |||||
| Generic (ConwayCertState era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.CertState Associated Types
Methods from ∷ ConwayCertState era → Rep (ConwayCertState era) x # to ∷ Rep (ConwayCertState era) x → ConwayCertState era # | |||||
| Show (Accounts era) ⇒ Show (ConwayCertState era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.CertState Methods showsPrec ∷ Int → ConwayCertState era → ShowS # show ∷ ConwayCertState era → String # showList ∷ [ConwayCertState era] → ShowS # | |||||
| Eq (Accounts era) ⇒ Eq (ConwayCertState era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.CertState Methods (==) ∷ ConwayCertState era → ConwayCertState era → Bool # (/=) ∷ ConwayCertState era → ConwayCertState era → Bool # | |||||
| (Era era, NoThunks (Accounts era)) ⇒ NoThunks (ConwayCertState era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.CertState | |||||
| type Share (ConwayCertState era) Source # | |||||
| type Rep (ConwayCertState era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.CertState type Rep (ConwayCertState era) = D1 ('MetaData "ConwayCertState" "Cardano.Ledger.Conway.State.CertState" "cardano-ledger-conway-1.21.0.0-inplace" 'False) (C1 ('MetaCons "ConwayCertState" 'PrefixI 'True) (S1 ('MetaSel ('Just "conwayCertVState") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (VState era)) :*: (S1 ('MetaSel ('Just "conwayCertPState") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (PState era)) :*: S1 ('MetaSel ('Just "conwayCertDState") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (DState era))))) | |||||
class (EraCertState era, ConwayEraAccounts era) ⇒ ConwayEraCertState era where Source #
Instances
csCommitteeCredsL ∷ ∀ era f. Functor f ⇒ (Map (Credential 'ColdCommitteeRole) CommitteeAuthorization → f (Map (Credential 'ColdCommitteeRole) CommitteeAuthorization)) → CommitteeState era → f (CommitteeState era) Source #
mkConwayCertState ∷ ConwayEraCertState era ⇒ VState era → PState era → DState era → CertState era Source #
conwayCertDStateL ∷ ∀ era f. Functor f ⇒ (DState era → f (DState era)) → ConwayCertState era → f (ConwayCertState era) Source #
conwayCertPStateL ∷ ∀ era f. Functor f ⇒ (PState era → f (PState era)) → ConwayCertState era → f (ConwayCertState era) Source #
conwayCertVStateL ∷ ∀ era f. Functor f ⇒ (VState era → f (VState era)) → ConwayCertState era → f (ConwayCertState era) Source #
conwayObligationCertState ∷ ConwayEraCertState era ⇒ CertState era → Obligations Source #
conwayCertsTotalDepositsTxBody ∷ ∀ era (l ∷ TxLevel). EraTxBody era ⇒ PParams era → ConwayCertState era → TxBody l era → Coin Source #
conwayCertsTotalRefundsTxBody ∷ ∀ era (l ∷ TxLevel). (EraTxBody era, EraAccounts era) ⇒ PParams era → ConwayCertState era → TxBody l era → Coin Source #
newtype ConwayInstantStake era Source #
Constructors
| ConwayInstantStake | |
Fields | |
Instances
| ToJSON (ConwayInstantStake era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Stake Methods toJSON ∷ ConwayInstantStake era → Value Source # toEncoding ∷ ConwayInstantStake era → Encoding Source # toJSONList ∷ [ConwayInstantStake era] → Value Source # toEncodingList ∷ [ConwayInstantStake era] → Encoding Source # omitField ∷ ConwayInstantStake era → Bool Source # | |||||
| DecShareCBOR (ConwayInstantStake era) Source # | |||||
| EncCBOR (ConwayInstantStake era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Stake Methods encCBOR ∷ ConwayInstantStake era → Encoding Source # | |||||
| ToKeyValuePairs (ConwayInstantStake era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Stake Methods toKeyValuePairs ∷ KeyValue e kv ⇒ ConwayInstantStake era → [kv] Source # | |||||
| Default (ConwayInstantStake era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Stake Methods def ∷ ConwayInstantStake era Source # | |||||
| NFData (ConwayInstantStake era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Stake Methods rnf ∷ ConwayInstantStake era → () # | |||||
| Monoid (ConwayInstantStake era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Stake Methods mempty ∷ ConwayInstantStake era # mappend ∷ ConwayInstantStake era → ConwayInstantStake era → ConwayInstantStake era # mconcat ∷ [ConwayInstantStake era] → ConwayInstantStake era # | |||||
| Semigroup (ConwayInstantStake era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Stake Methods (<>) ∷ ConwayInstantStake era → ConwayInstantStake era → ConwayInstantStake era # sconcat ∷ NonEmpty (ConwayInstantStake era) → ConwayInstantStake era # stimes ∷ Integral b ⇒ b → ConwayInstantStake era → ConwayInstantStake era # | |||||
| Generic (ConwayInstantStake era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Stake Associated Types
Methods from ∷ ConwayInstantStake era → Rep (ConwayInstantStake era) x # to ∷ Rep (ConwayInstantStake era) x → ConwayInstantStake era # | |||||
| Show (ConwayInstantStake era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Stake Methods showsPrec ∷ Int → ConwayInstantStake era → ShowS # show ∷ ConwayInstantStake era → String # showList ∷ [ConwayInstantStake era] → ShowS # | |||||
| Eq (ConwayInstantStake era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Stake Methods (==) ∷ ConwayInstantStake era → ConwayInstantStake era → Bool # (/=) ∷ ConwayInstantStake era → ConwayInstantStake era → Bool # | |||||
| Ord (ConwayInstantStake era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Stake Methods compare ∷ ConwayInstantStake era → ConwayInstantStake era → Ordering # (<) ∷ ConwayInstantStake era → ConwayInstantStake era → Bool # (<=) ∷ ConwayInstantStake era → ConwayInstantStake era → Bool # (>) ∷ ConwayInstantStake era → ConwayInstantStake era → Bool # (>=) ∷ ConwayInstantStake era → ConwayInstantStake era → Bool # max ∷ ConwayInstantStake era → ConwayInstantStake era → ConwayInstantStake era # min ∷ ConwayInstantStake era → ConwayInstantStake era → ConwayInstantStake era # | |||||
| NoThunks (ConwayInstantStake era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Stake | |||||
| type Share (ConwayInstantStake era) Source # | |||||
| type Rep (ConwayInstantStake era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.Stake type Rep (ConwayInstantStake era) = D1 ('MetaData "ConwayInstantStake" "Cardano.Ledger.Conway.State.Stake" "cardano-ledger-conway-1.21.0.0-inplace" 'True) (C1 ('MetaCons "ConwayInstantStake" 'PrefixI 'True) (S1 ('MetaSel ('Just "cisCredentialStake") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map (Credential 'Staking) (CompactForm Coin))))) | |||||
conwayInstantStakeCredentialsL ∷ ∀ era f. Functor f ⇒ (Map (Credential 'Staking) (CompactForm Coin) → f (Map (Credential 'Staking) (CompactForm Coin))) → ConwayInstantStake era → f (ConwayInstantStake era) Source #
addConwayInstantStake ∷ EraTxOut era ⇒ UTxO era → ConwayInstantStake era → ConwayInstantStake era Source #
deleteConwayInstantStake ∷ EraTxOut era ⇒ UTxO era → ConwayInstantStake era → ConwayInstantStake era Source #
resolveConwayInstantStake ∷ (EraStake era, InstantStake era ~ ConwayInstantStake era) ⇒ ConwayInstantStake era → Accounts era → Stake Source #
The state that tracks the voting entities (DReps and Constitutional Committee
members). In the formal ledger specification this type is called GState
Constructors
| VState | |
Fields
| |
Instances
| ToJSON (VState era) Source # | |||||
| Era era ⇒ DecCBOR (VState era) Source # | |||||
| Era era ⇒ DecShareCBOR (VState era) Source # | |||||
| Era era ⇒ EncCBOR (VState era) Source # | |||||
| ToKeyValuePairs (VState era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.VState Methods toKeyValuePairs ∷ KeyValue e kv ⇒ VState era → [kv] Source # | |||||
| Default (VState era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.VState | |||||
| NFData (VState era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.VState | |||||
| Generic (VState era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.VState Associated Types
| |||||
| Show (VState era) Source # | |||||
| Eq (VState era) Source # | |||||
| NoThunks (VState era) Source # | |||||
| type Share (VState era) Source # | |||||
| type Rep (VState era) Source # | |||||
Defined in Cardano.Ledger.Conway.State.VState type Rep (VState era) = D1 ('MetaData "VState" "Cardano.Ledger.Conway.State.VState" "cardano-ledger-conway-1.21.0.0-inplace" 'False) (C1 ('MetaCons "VState" 'PrefixI 'True) (S1 ('MetaSel ('Just "vsDReps") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (Map (Credential 'DRepRole) DRepState)) :*: (S1 ('MetaSel ('Just "vsCommitteeState") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (CommitteeState era)) :*: S1 ('MetaSel ('Just "vsNumDormantEpochs") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 EpochNo)))) | |||||
vsDRepsL ∷ ∀ era f. Functor f ⇒ (Map (Credential 'DRepRole) DRepState → f (Map (Credential 'DRepRole) DRepState)) → VState era → f (VState era) Source #
vsCommitteeStateL ∷ ∀ era f. Functor f ⇒ (CommitteeState era → f (CommitteeState era)) → VState era → f (VState era) Source #
vsNumDormantEpochsL ∷ ∀ era f. Functor f ⇒ (EpochNo → f EpochNo) → VState era → f (VState era) Source #
vsActualDRepExpiry ∷ Credential 'DRepRole → VState era → Maybe EpochNo Source #
lookupDepositVState ∷ VState era → Credential 'DRepRole → Maybe Coin Source #
Function that looks up the deposit for currently registered DRep
Arguments
| ∷ ConwayEraAccounts era | |
| ⇒ Credential 'Staking | |
| → AccountState era | Account that is losing its current delegation and/or acquiring a new one |
| → Maybe DRep | Potential new delegation. In case when stake credential unregisters this must be |
| → VState era | |
| → VState era |
Reverses DRep delegation. To be called when a stake credential is unregistered or its delegation target changes. If the new delegation matches the previous one, this is a noop.