cardano-ledger-shelley-1.20.0.0: Shelley Ledger Executable Model
Safe HaskellNone
LanguageHaskell2010

Cardano.Ledger.Shelley.Rules

Contents

Synopsis

Block

type family State a Source #

Type of the state which the system transitions between.

Instances

Instances details
type State (BBODY era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type State (BBODY era) = ShelleyBbodyState era
type State (DELEG era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type State (DELEG era) = CertState era
type State (DELEGS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type State (DELEGS era) = CertState era
type State (DELPL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type State (DELPL era) = CertState era
type State (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type State (EPOCH era) = EpochState era
type State (LEDGER era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type State (LEDGER era) = LedgerState era
type State (LEDGERS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type State (LEDGERS era) = LedgerState era
type State (MIR era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

type State (MIR era) = EpochState era
type State (NEWEPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type State (NEWEPOCH era) = NewEpochState era
type State (NEWPP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

type State (NEWPP era) = ShelleyNewppState era
type State (POOL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type State (POOL era) = PState era
type State (POOLREAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type State (PPUP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type State (PPUP era) = ShelleyGovState era
type State (RUPD era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

type State (SNAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type State (SNAP era) = SnapShots era
type State (TICK era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type State (TICK era) = NewEpochState era
type State (TICKF era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type State (TICKF era) = NewEpochState era
type State (UPEC era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

type State (UPEC era) = UpecState era
type State (UTXO era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type State (UTXO era) = UTxOState era
type State (UTXOW era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type State (UTXOW era) = UTxOState era
type State (STUB e st si f m) 
Instance details

Defined in Control.State.Transition.Extended

type State (STUB e st si f m) = st

type family State a Source #

Type of the state which the system transitions between.

Instances

Instances details
type State (BBODY era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type State (BBODY era) = ShelleyBbodyState era
type State (DELEG era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type State (DELEG era) = CertState era
type State (DELEGS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type State (DELEGS era) = CertState era
type State (DELPL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type State (DELPL era) = CertState era
type State (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type State (EPOCH era) = EpochState era
type State (LEDGER era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type State (LEDGER era) = LedgerState era
type State (LEDGERS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type State (LEDGERS era) = LedgerState era
type State (MIR era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

type State (MIR era) = EpochState era
type State (NEWEPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type State (NEWEPOCH era) = NewEpochState era
type State (NEWPP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

type State (NEWPP era) = ShelleyNewppState era
type State (POOL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type State (POOL era) = PState era
type State (POOLREAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type State (PPUP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type State (PPUP era) = ShelleyGovState era
type State (RUPD era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

type State (SNAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type State (SNAP era) = SnapShots era
type State (TICK era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type State (TICK era) = NewEpochState era
type State (TICKF era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type State (TICKF era) = NewEpochState era
type State (UPEC era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

type State (UPEC era) = UpecState era
type State (UTXO era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type State (UTXO era) = UTxOState era
type State (UTXOW era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type State (UTXOW era) = UTxOState era
type State (STUB e st si f m) 
Instance details

Defined in Control.State.Transition.Extended

type State (STUB e st si f m) = st

data BBODY era Source #

Instances

Instances details
(Era era, BaseM ledgers ~ ShelleyBase, ledgers ~ EraRule "LEDGERS" era, STS ledgers, Era era) ⇒ Embed ledgers (BBODY era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

Methods

wrapFailed ∷ PredicateFailure ledgers → PredicateFailure (BBODY era) Source #

wrapEvent ∷ Event ledgers → Event (BBODY era) Source #

(EraBlockBody era, EraRule "BBODY" era ~ BBODY era, InjectRuleFailure "BBODY" ShelleyBbodyPredFailure era, Embed (EraRule "LEDGERS" era) (BBODY era), Environment (EraRule "LEDGERS" era) ~ ShelleyLedgersEnv era, Signal (EraRule "LEDGERS" era) ~ Seq (Tx 'TopTx era)) ⇒ STS (BBODY era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

Associated Types

type State (BBODY era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type State (BBODY era) = ShelleyBbodyState era
type Signal (BBODY era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type Signal (BBODY era) = TPraosBbodySignal era
type Environment (BBODY era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type Environment (BBODY era) = BbodyEnv era
type BaseM (BBODY era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type BaseM (BBODY era) = ShelleyBase
type Event (BBODY era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type Event (BBODY era) = ShelleyBbodyEvent era
type PredicateFailure (BBODY era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type BaseM (BBODY era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type BaseM (BBODY era) = ShelleyBase
type Environment (BBODY era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type Environment (BBODY era) = BbodyEnv era
type Event (BBODY era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type Event (BBODY era) = ShelleyBbodyEvent era
type PredicateFailure (BBODY era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type Signal (BBODY era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type Signal (BBODY era) = TPraosBbodySignal era
type State (BBODY era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type State (BBODY era) = ShelleyBbodyState era

data ShelleyBbodyState era Source #

Constructors

BbodyState !(State (EraRule "LEDGERS" era)) !BlocksMade 

Instances

Instances details
Generic (ShelleyBbodyState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

Associated Types

type Rep (ShelleyBbodyState era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type Rep (ShelleyBbodyState era) = D1 ('MetaData "ShelleyBbodyState" "Cardano.Ledger.Shelley.Rules.Bbody" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "BbodyState" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (State (EraRule "LEDGERS" era))) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 BlocksMade)))

Methods

from ∷ ShelleyBbodyState era → Rep (ShelleyBbodyState era) x #

to ∷ Rep (ShelleyBbodyState era) x → ShelleyBbodyState era #

Show (State (EraRule "LEDGERS" era)) ⇒ Show (ShelleyBbodyState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

Eq (State (EraRule "LEDGERS" era)) ⇒ Eq (ShelleyBbodyState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type Rep (ShelleyBbodyState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type Rep (ShelleyBbodyState era) = D1 ('MetaData "ShelleyBbodyState" "Cardano.Ledger.Shelley.Rules.Bbody" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "BbodyState" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (State (EraRule "LEDGERS" era))) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 BlocksMade)))

data BbodyEnv era Source #

Constructors

BbodyEnv 

data ShelleyBbodyPredFailure era Source #

Constructors

WrongBlockBodySizeBBODY (Mismatch 'RelEQ Int)

mismatchSupplied ~ Actual body size. mismatchExpected ~ Claimed body size in the header.

InvalidBodyHashBBODY (Mismatch 'RelEQ (Hash HASH EraIndependentBlockBody))

mismatchSupplied ~ Actual hash. mismatchExpected ~ Claimed hash in the header.

LedgersFailure (PredicateFailure (EraRule "LEDGERS" era)) 

Instances

Instances details
InjectRuleFailure "BBODY" ShelleyBbodyPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

(Era era, DecCBOR (PredicateFailure (EraRule "LEDGERS" era))) ⇒ DecCBOR (ShelleyBbodyPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

(Era era, EncCBOR (PredicateFailure (EraRule "LEDGERS" era))) ⇒ EncCBOR (ShelleyBbodyPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

NFData (PredicateFailure (EraRule "LEDGERS" era)) ⇒ NFData (ShelleyBbodyPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

Methods

rnf ∷ ShelleyBbodyPredFailure era → () #

Generic (ShelleyBbodyPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

Associated Types

type Rep (ShelleyBbodyPredFailure era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type Rep (ShelleyBbodyPredFailure era) = D1 ('MetaData "ShelleyBbodyPredFailure" "Cardano.Ledger.Shelley.Rules.Bbody" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "WrongBlockBodySizeBBODY" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelEQ Int))) :+: (C1 ('MetaCons "InvalidBodyHashBBODY" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelEQ (Hash HASH EraIndependentBlockBody)))) :+: C1 ('MetaCons "LedgersFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PredicateFailure (EraRule "LEDGERS" era))))))
(Era era, Show (PredicateFailure (EraRule "LEDGERS" era))) ⇒ Show (ShelleyBbodyPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

(Era era, Eq (PredicateFailure (EraRule "LEDGERS" era))) ⇒ Eq (ShelleyBbodyPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

(Era era, Ord (PredicateFailure (EraRule "LEDGERS" era))) ⇒ Ord (ShelleyBbodyPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type Rep (ShelleyBbodyPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type Rep (ShelleyBbodyPredFailure era) = D1 ('MetaData "ShelleyBbodyPredFailure" "Cardano.Ledger.Shelley.Rules.Bbody" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "WrongBlockBodySizeBBODY" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelEQ Int))) :+: (C1 ('MetaCons "InvalidBodyHashBBODY" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelEQ (Hash HASH EraIndependentBlockBody)))) :+: C1 ('MetaCons "LedgersFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PredicateFailure (EraRule "LEDGERS" era))))))

newtype ShelleyBbodyEvent era Source #

Constructors

LedgersEvent (Event (EraRule "LEDGERS" era)) 

Instances

Instances details
Generic (ShelleyBbodyEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

Associated Types

type Rep (ShelleyBbodyEvent era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type Rep (ShelleyBbodyEvent era) = D1 ('MetaData "ShelleyBbodyEvent" "Cardano.Ledger.Shelley.Rules.Bbody" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "LedgersEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "LEDGERS" era)))))

Methods

from ∷ ShelleyBbodyEvent era → Rep (ShelleyBbodyEvent era) x #

to ∷ Rep (ShelleyBbodyEvent era) x → ShelleyBbodyEvent era #

Eq (Event (EraRule "LEDGERS" era)) ⇒ Eq (ShelleyBbodyEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type Rep (ShelleyBbodyEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type Rep (ShelleyBbodyEvent era) = D1 ('MetaData "ShelleyBbodyEvent" "Cardano.Ledger.Shelley.Rules.Bbody" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "LedgersEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "LEDGERS" era)))))

validateBlockBodySize ∷ (EraBlockHeader h era, EraBlockBody era, InjectRuleFailure "BBODY" ShelleyBbodyPredFailure era) ⇒ Block h era → ProtVer → Rule (EraRule "BBODY" era) 'Transition () Source #

Validate that actual block body size matches claimed size in block header.

validateBlockBodyHash ∷ (EraBlockHeader h era, EraBlockBody era, InjectRuleFailure "BBODY" ShelleyBbodyPredFailure era) ⇒ Block h era → Rule (EraRule "BBODY" era) 'Transition () Source #

Validate that actual block body hash matches claimed hash in block header.

data DelegEnv era Source #

Instances

Instances details
NFData (PParams era) ⇒ NFData (DelegEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

Methods

rnf ∷ DelegEnv era → () #

Generic (DelegEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

Associated Types

type Rep (DelegEnv era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Rep (DelegEnv era) = D1 ('MetaData "DelegEnv" "Cardano.Ledger.Shelley.Rules.Deleg" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "DelegEnv" 'PrefixI 'True) ((S1 ('MetaSel ('Just "slotNo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 SlotNo) :*: S1 ('MetaSel ('Just "deCurEpochNo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EpochNo)) :*: (S1 ('MetaSel ('Just "ptr_") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Ptr) :*: (S1 ('MetaSel ('Just "deChainAccountState") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ChainAccountState) :*: S1 ('MetaSel ('Just "ppDE") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PParams era))))))

Methods

from ∷ DelegEnv era → Rep (DelegEnv era) x #

to ∷ Rep (DelegEnv era) x → DelegEnv era #

Show (PParams era) ⇒ Show (DelegEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

Methods

showsPrec ∷ Int → DelegEnv era → ShowS #

show ∷ DelegEnv era → String #

showList ∷ [DelegEnv era] → ShowS #

Eq (PParams era) ⇒ Eq (DelegEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

Methods

(==) ∷ DelegEnv era → DelegEnv era → Bool #

(/=) ∷ DelegEnv era → DelegEnv era → Bool #

type Rep (DelegEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Rep (DelegEnv era) = D1 ('MetaData "DelegEnv" "Cardano.Ledger.Shelley.Rules.Deleg" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "DelegEnv" 'PrefixI 'True) ((S1 ('MetaSel ('Just "slotNo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 SlotNo) :*: S1 ('MetaSel ('Just "deCurEpochNo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EpochNo)) :*: (S1 ('MetaSel ('Just "ptr_") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Ptr) :*: (S1 ('MetaSel ('Just "deChainAccountState") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ChainAccountState) :*: S1 ('MetaSel ('Just "ppDE") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PParams era))))))

data DELEG era Source #

Instances

Instances details
(EraCertState era, EraPParams era, ShelleyEraAccounts era, ShelleyEraTxCert era, AtMostEra "Babbage" era, EraRuleFailure "DELEG" era ~ ShelleyDelegPredFailure era, InjectRuleFailure "DELEG" AccountAlreadyRegistered era) ⇒ STS (DELEG era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

Associated Types

type State (DELEG era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type State (DELEG era) = CertState era
type Signal (DELEG era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Signal (DELEG era) = TxCert era
type Environment (DELEG era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Environment (DELEG era) = DelegEnv era
type BaseM (DELEG era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type BaseM (DELEG era) = ShelleyBase
type Event (DELEG era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Event (DELEG era) = ShelleyDelegEvent era
type PredicateFailure (DELEG era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

(ShelleyEraAccounts era, ShelleyEraTxCert era, EraCertState era, EraPParams era, AtMostEra "Babbage" era, PredicateFailure (EraRule "DELEG" era) ~ ShelleyDelegPredFailure era, Event (EraRule "DELEG" era) ~ ShelleyDelegEvent era, EraRuleFailure "DELEG" era ~ ShelleyDelegPredFailure era, InjectRuleFailure "DELEG" AccountAlreadyRegistered era) ⇒ Embed (DELEG era) (DELPL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type BaseM (DELEG era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type BaseM (DELEG era) = ShelleyBase
type Environment (DELEG era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Environment (DELEG era) = DelegEnv era
type Event (DELEG era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Event (DELEG era) = ShelleyDelegEvent era
type PredicateFailure (DELEG era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Signal (DELEG era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Signal (DELEG era) = TxCert era
type State (DELEG era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type State (DELEG era) = CertState era

data ShelleyDelegPredFailure era Source #

Instances

Instances details
InjectRuleFailure "BBODY" ShelleyDelegPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

InjectRuleFailure "DELEG" ShelleyDelegPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

InjectRuleFailure "DELEGS" ShelleyDelegPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

InjectRuleFailure "DELPL" ShelleyDelegPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

InjectRuleFailure "LEDGER" ShelleyDelegPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

InjectRuleFailure "LEDGERS" ShelleyDelegPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

(Era era, Typeable (Script era)) ⇒ DecCBOR (ShelleyDelegPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

Era era ⇒ EncCBOR (ShelleyDelegPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

NFData (ShelleyDelegPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

Methods

rnf ∷ ShelleyDelegPredFailure era → () #

Generic (ShelleyDelegPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

Associated Types

type Rep (ShelleyDelegPredFailure era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Rep (ShelleyDelegPredFailure era) = D1 ('MetaData "ShelleyDelegPredFailure" "Cardano.Ledger.Shelley.Rules.Deleg" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) ((((C1 ('MetaCons "DelegAccountAlreadyRegistered" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (AccountAlreadyRegistered era))) :+: C1 ('MetaCons "StakeKeyNotRegisteredDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Credential 'Staking)))) :+: (C1 ('MetaCons "StakeKeyNonZeroAccountBalanceDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Coin)) :+: C1 ('MetaCons "StakeDelegationImpossibleDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Credential 'Staking))))) :+: ((C1 ('MetaCons "WrongCertificateTypeDELEG" 'PrefixI 'False) (U1 ∷ Type → Type) :+: C1 ('MetaCons "GenesisKeyNotInMappingDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'GenesisRole)))) :+: (C1 ('MetaCons "DuplicateGenesisDelegateDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'GenesisDelegate))) :+: C1 ('MetaCons "InsufficientForInstantaneousRewardsDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 MIRPot) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelLTEQ Coin)))))) :+: (((C1 ('MetaCons "MIRCertificateTooLateinEpochDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelLT SlotNo))) :+: C1 ('MetaCons "DuplicateGenesisVRFDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (VRFVerKeyHash 'GenDelegVRF)))) :+: (C1 ('MetaCons "MIRTransferNotCurrentlyAllowed" 'PrefixI 'False) (U1 ∷ Type → Type) :+: C1 ('MetaCons "MIRNegativesNotCurrentlyAllowed" 'PrefixI 'False) (U1 ∷ Type → Type))) :+: ((C1 ('MetaCons "InsufficientForTransferDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 MIRPot) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelLTEQ Coin))) :+: C1 ('MetaCons "MIRProducesNegativeUpdate" 'PrefixI 'False) (U1 ∷ Type → Type)) :+: (C1 ('MetaCons "MIRNegativeTransfer" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 MIRPot) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Coin)) :+: C1 ('MetaCons "DelegateeNotRegisteredDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'StakePool)))))))
Show (ShelleyDelegPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

Eq (ShelleyDelegPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

Ord (ShelleyDelegPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Rep (ShelleyDelegPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Rep (ShelleyDelegPredFailure era) = D1 ('MetaData "ShelleyDelegPredFailure" "Cardano.Ledger.Shelley.Rules.Deleg" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) ((((C1 ('MetaCons "DelegAccountAlreadyRegistered" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (AccountAlreadyRegistered era))) :+: C1 ('MetaCons "StakeKeyNotRegisteredDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Credential 'Staking)))) :+: (C1 ('MetaCons "StakeKeyNonZeroAccountBalanceDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Coin)) :+: C1 ('MetaCons "StakeDelegationImpossibleDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Credential 'Staking))))) :+: ((C1 ('MetaCons "WrongCertificateTypeDELEG" 'PrefixI 'False) (U1 ∷ Type → Type) :+: C1 ('MetaCons "GenesisKeyNotInMappingDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'GenesisRole)))) :+: (C1 ('MetaCons "DuplicateGenesisDelegateDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'GenesisDelegate))) :+: C1 ('MetaCons "InsufficientForInstantaneousRewardsDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 MIRPot) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelLTEQ Coin)))))) :+: (((C1 ('MetaCons "MIRCertificateTooLateinEpochDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelLT SlotNo))) :+: C1 ('MetaCons "DuplicateGenesisVRFDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (VRFVerKeyHash 'GenDelegVRF)))) :+: (C1 ('MetaCons "MIRTransferNotCurrentlyAllowed" 'PrefixI 'False) (U1 ∷ Type → Type) :+: C1 ('MetaCons "MIRNegativesNotCurrentlyAllowed" 'PrefixI 'False) (U1 ∷ Type → Type))) :+: ((C1 ('MetaCons "InsufficientForTransferDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 MIRPot) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelLTEQ Coin))) :+: C1 ('MetaCons "MIRProducesNegativeUpdate" 'PrefixI 'False) (U1 ∷ Type → Type)) :+: (C1 ('MetaCons "MIRNegativeTransfer" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 MIRPot) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Coin)) :+: C1 ('MetaCons "DelegateeNotRegisteredDELEG" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'StakePool)))))))

newtype ShelleyDelegEvent era Source #

Constructors

DelegNewEpoch EpochNo 

Instances

Instances details
NFData (ShelleyDelegEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

Methods

rnf ∷ ShelleyDelegEvent era → () #

Generic (ShelleyDelegEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

Associated Types

type Rep (ShelleyDelegEvent era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Rep (ShelleyDelegEvent era) = D1 ('MetaData "ShelleyDelegEvent" "Cardano.Ledger.Shelley.Rules.Deleg" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "DelegNewEpoch" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EpochNo)))

Methods

from ∷ ShelleyDelegEvent era → Rep (ShelleyDelegEvent era) x #

to ∷ Rep (ShelleyDelegEvent era) x → ShelleyDelegEvent era #

Eq (ShelleyDelegEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Rep (ShelleyDelegEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Rep (ShelleyDelegEvent era) = D1 ('MetaData "ShelleyDelegEvent" "Cardano.Ledger.Shelley.Rules.Deleg" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "DelegNewEpoch" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EpochNo)))

newtype AccountAlreadyRegistered era Source #

Predicate failure that is reported upon an attempt to register an account with a staking credential that is already registered.

Instances

Instances details
InjectRuleFailure "DELEG" AccountAlreadyRegistered ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

InjectRuleFailure "LEDGER" AccountAlreadyRegistered ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

Typeable era ⇒ DecCBOR (AccountAlreadyRegistered era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

EncCBOR (AccountAlreadyRegistered era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

NFData (AccountAlreadyRegistered era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

Methods

rnf ∷ AccountAlreadyRegistered era → () #

Generic (AccountAlreadyRegistered era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

Associated Types

type Rep (AccountAlreadyRegistered era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Rep (AccountAlreadyRegistered era) = D1 ('MetaData "AccountAlreadyRegistered" "Cardano.Ledger.Shelley.Rules.Deleg" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "AccountAlreadyRegistered" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Credential 'Staking))))
Show (AccountAlreadyRegistered era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

Eq (AccountAlreadyRegistered era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

Ord (AccountAlreadyRegistered era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Rep (AccountAlreadyRegistered era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type Rep (AccountAlreadyRegistered era) = D1 ('MetaData "AccountAlreadyRegistered" "Cardano.Ledger.Shelley.Rules.Deleg" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "AccountAlreadyRegistered" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Credential 'Staking))))

checkAccountAlreadyRegistered ∷ ∀ (rule ∷ Symbol) sts era. (InjectRuleFailure rule AccountAlreadyRegistered era, PredicateFailure sts ~ EraRuleFailure rule era, EraAccounts era) ⇒ Accounts era → Credential 'Staking → Rule sts 'Transition () Source #

AccountAlreadyRegistered predicate failure check.

In Shelley spec defined in:

Figure 23: Delegation Inference Rules (8)

(hk ∉ dom (rewards ds))

data DelegsEnv era Source #

Constructors

DelegsEnv 

Fields

Instances

Instances details
(Show (Tx 'TopTx era), Show (PParams era)) ⇒ Show (DelegsEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

Methods

showsPrec ∷ Int → DelegsEnv era → ShowS #

show ∷ DelegsEnv era → String #

showList ∷ [DelegsEnv era] → ShowS #

data DELEGS era Source #

Instances

Instances details
(EraTx era, EraCertState era, ShelleyEraTxBody era, Embed (EraRule "DELPL" era) (DELEGS era), Environment (EraRule "DELPL" era) ~ DelplEnv era, State (EraRule "DELPL" era) ~ CertState era, Signal (EraRule "DELPL" era) ~ TxCert era, EraRule "DELEGS" era ~ DELEGS era) ⇒ STS (DELEGS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

Associated Types

type State (DELEGS era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type State (DELEGS era) = CertState era
type Signal (DELEGS era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type Signal (DELEGS era) = Seq (TxCert era)
type Environment (DELEGS era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type Environment (DELEGS era) = DelegsEnv era
type BaseM (DELEGS era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type BaseM (DELEGS era) = ShelleyBase
type Event (DELEGS era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type PredicateFailure (DELEGS era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

(Era era, STS (DELEGS era), PredicateFailure (EraRule "DELEGS" era) ~ ShelleyDelegsPredFailure era, Event (EraRule "DELEGS" era) ~ ShelleyDelegsEvent era) ⇒ Embed (DELEGS era) (LEDGER era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

(Era era, STS (DELPL era), PredicateFailure (EraRule "DELPL" era) ~ ShelleyDelplPredFailure era, Event (EraRule "DELPL" era) ~ ShelleyDelplEvent era) ⇒ Embed (DELPL era) (DELEGS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type BaseM (DELEGS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type BaseM (DELEGS era) = ShelleyBase
type Environment (DELEGS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type Environment (DELEGS era) = DelegsEnv era
type Event (DELEGS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type PredicateFailure (DELEGS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type Signal (DELEGS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type Signal (DELEGS era) = Seq (TxCert era)
type State (DELEGS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type State (DELEGS era) = CertState era

newtype ShelleyDelegsPredFailure era Source #

Constructors

DelplFailure (PredicateFailure (EraRule "DELPL" era))

Subtransition Failures

Instances

Instances details
InjectRuleFailure "BBODY" ShelleyDelegsPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

InjectRuleFailure "DELEGS" ShelleyDelegsPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

InjectRuleFailure "LEDGER" ShelleyDelegsPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

InjectRuleFailure "LEDGERS" ShelleyDelegsPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

(Era era, DecCBOR (PredicateFailure (EraRule "DELPL" era)), Typeable (Script era)) ⇒ DecCBOR (ShelleyDelegsPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

(Era era, EncCBOR (PredicateFailure (EraRule "DELPL" era))) ⇒ EncCBOR (ShelleyDelegsPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

NFData (PredicateFailure (EraRule "DELPL" era)) ⇒ NFData (ShelleyDelegsPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

Methods

rnf ∷ ShelleyDelegsPredFailure era → () #

Generic (ShelleyDelegsPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

Associated Types

type Rep (ShelleyDelegsPredFailure era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type Rep (ShelleyDelegsPredFailure era) = D1 ('MetaData "ShelleyDelegsPredFailure" "Cardano.Ledger.Shelley.Rules.Delegs" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "DelplFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PredicateFailure (EraRule "DELPL" era)))))
Show (PredicateFailure (EraRule "DELPL" era)) ⇒ Show (ShelleyDelegsPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

Eq (PredicateFailure (EraRule "DELPL" era)) ⇒ Eq (ShelleyDelegsPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

Ord (PredicateFailure (EraRule "DELPL" era)) ⇒ Ord (ShelleyDelegsPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type Rep (ShelleyDelegsPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type Rep (ShelleyDelegsPredFailure era) = D1 ('MetaData "ShelleyDelegsPredFailure" "Cardano.Ledger.Shelley.Rules.Delegs" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "DelplFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PredicateFailure (EraRule "DELPL" era)))))

newtype ShelleyDelegsEvent era Source #

Constructors

DelplEvent (Event (EraRule "DELPL" era)) 

Instances

Instances details
NFData (Event (EraRule "DELPL" era)) ⇒ NFData (ShelleyDelegsEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

Methods

rnf ∷ ShelleyDelegsEvent era → () #

Generic (ShelleyDelegsEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

Associated Types

type Rep (ShelleyDelegsEvent era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type Rep (ShelleyDelegsEvent era) = D1 ('MetaData "ShelleyDelegsEvent" "Cardano.Ledger.Shelley.Rules.Delegs" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "DelplEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "DELPL" era)))))
Eq (Event (EraRule "DELPL" era)) ⇒ Eq (ShelleyDelegsEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type Rep (ShelleyDelegsEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type Rep (ShelleyDelegsEvent era) = D1 ('MetaData "ShelleyDelegsEvent" "Cardano.Ledger.Shelley.Rules.Delegs" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "DelplEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "DELPL" era)))))

data DELPL era Source #

Instances

Instances details
(Era era, EraCertState era, Embed (EraRule "DELEG" era) (DELPL era), Environment (EraRule "DELEG" era) ~ DelegEnv era, State (EraRule "DELEG" era) ~ CertState era, Embed (EraRule "POOL" era) (DELPL era), Environment (EraRule "POOL" era) ~ PoolEnv era, State (EraRule "POOL" era) ~ PState era, Signal (EraRule "DELEG" era) ~ TxCert era, Embed (EraRule "POOL" era) (DELPL era), Environment (EraRule "POOL" era) ~ PoolEnv era, Signal (EraRule "POOL" era) ~ PoolCert era, TxCert era ~ ShelleyTxCert era) ⇒ STS (DELPL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

Associated Types

type State (DELPL era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type State (DELPL era) = CertState era
type Signal (DELPL era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type Signal (DELPL era) = TxCert era
type Environment (DELPL era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type Environment (DELPL era) = DelplEnv era
type BaseM (DELPL era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type BaseM (DELPL era) = ShelleyBase
type Event (DELPL era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type Event (DELPL era) = ShelleyDelplEvent era
type PredicateFailure (DELPL era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

(ShelleyEraAccounts era, ShelleyEraTxCert era, EraCertState era, EraPParams era, AtMostEra "Babbage" era, PredicateFailure (EraRule "DELEG" era) ~ ShelleyDelegPredFailure era, Event (EraRule "DELEG" era) ~ ShelleyDelegEvent era, EraRuleFailure "DELEG" era ~ ShelleyDelegPredFailure era, InjectRuleFailure "DELEG" AccountAlreadyRegistered era) ⇒ Embed (DELEG era) (DELPL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

(Era era, STS (DELPL era), PredicateFailure (EraRule "DELPL" era) ~ ShelleyDelplPredFailure era, Event (EraRule "DELPL" era) ~ ShelleyDelplEvent era) ⇒ Embed (DELPL era) (DELEGS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

(Era era, STS (POOL era), PredicateFailure (EraRule "POOL" era) ~ ShelleyPoolPredFailure era, Event (EraRule "POOL" era) ~ PoolEvent era) ⇒ Embed (POOL era) (DELPL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type BaseM (DELPL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type BaseM (DELPL era) = ShelleyBase
type Environment (DELPL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type Environment (DELPL era) = DelplEnv era
type Event (DELPL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type Event (DELPL era) = ShelleyDelplEvent era
type PredicateFailure (DELPL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type Signal (DELPL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type Signal (DELPL era) = TxCert era
type State (DELPL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type State (DELPL era) = CertState era

data ShelleyDelplPredFailure era Source #

Constructors

PoolFailure (PredicateFailure (EraRule "POOL" era)) 
DelegFailure (PredicateFailure (EraRule "DELEG" era)) 

Instances

Instances details
InjectRuleFailure "BBODY" ShelleyDelplPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

InjectRuleFailure "DELEGS" ShelleyDelplPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

InjectRuleFailure "DELPL" ShelleyDelplPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

InjectRuleFailure "LEDGER" ShelleyDelplPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

InjectRuleFailure "LEDGERS" ShelleyDelplPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

(Era era, DecCBOR (PredicateFailure (EraRule "POOL" era)), DecCBOR (PredicateFailure (EraRule "DELEG" era)), Typeable (Script era)) ⇒ DecCBOR (ShelleyDelplPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

(Era era, EncCBOR (PredicateFailure (EraRule "POOL" era)), EncCBOR (PredicateFailure (EraRule "DELEG" era))) ⇒ EncCBOR (ShelleyDelplPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

(NFData (PredicateFailure (EraRule "DELEG" era)), NFData (PredicateFailure (EraRule "POOL" era))) ⇒ NFData (ShelleyDelplPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

Methods

rnf ∷ ShelleyDelplPredFailure era → () #

Generic (ShelleyDelplPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

Associated Types

type Rep (ShelleyDelplPredFailure era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type Rep (ShelleyDelplPredFailure era) = D1 ('MetaData "ShelleyDelplPredFailure" "Cardano.Ledger.Shelley.Rules.Delpl" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "PoolFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PredicateFailure (EraRule "POOL" era)))) :+: C1 ('MetaCons "DelegFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PredicateFailure (EraRule "DELEG" era)))))
(Show (PredicateFailure (EraRule "DELEG" era)), Show (PredicateFailure (EraRule "POOL" era))) ⇒ Show (ShelleyDelplPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

(Eq (PredicateFailure (EraRule "DELEG" era)), Eq (PredicateFailure (EraRule "POOL" era))) ⇒ Eq (ShelleyDelplPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

(Ord (PredicateFailure (EraRule "DELEG" era)), Ord (PredicateFailure (EraRule "POOL" era))) ⇒ Ord (ShelleyDelplPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type Rep (ShelleyDelplPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type Rep (ShelleyDelplPredFailure era) = D1 ('MetaData "ShelleyDelplPredFailure" "Cardano.Ledger.Shelley.Rules.Delpl" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "PoolFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PredicateFailure (EraRule "POOL" era)))) :+: C1 ('MetaCons "DelegFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PredicateFailure (EraRule "DELEG" era)))))

data ShelleyDelplEvent era Source #

Instances

Instances details
(NFData (Event (EraRule "DELEG" era)), NFData (Event (EraRule "POOL" era))) ⇒ NFData (ShelleyDelplEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

Methods

rnf ∷ ShelleyDelplEvent era → () #

Generic (ShelleyDelplEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

Associated Types

type Rep (ShelleyDelplEvent era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type Rep (ShelleyDelplEvent era) = D1 ('MetaData "ShelleyDelplEvent" "Cardano.Ledger.Shelley.Rules.Delpl" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "PoolEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "POOL" era)))) :+: C1 ('MetaCons "DelegEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "DELEG" era)))))

Methods

from ∷ ShelleyDelplEvent era → Rep (ShelleyDelplEvent era) x #

to ∷ Rep (ShelleyDelplEvent era) x → ShelleyDelplEvent era #

(Eq (Event (EraRule "DELEG" era)), Eq (Event (EraRule "POOL" era))) ⇒ Eq (ShelleyDelplEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type Rep (ShelleyDelplEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type Rep (ShelleyDelplEvent era) = D1 ('MetaData "ShelleyDelplEvent" "Cardano.Ledger.Shelley.Rules.Delpl" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "PoolEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "POOL" era)))) :+: C1 ('MetaCons "DelegEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "DELEG" era)))))

data LedgerEnv era Source #

Instances

Instances details
EraPParams era ⇒ EncCBOR (LedgerEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

Methods

encCBOR ∷ LedgerEnv era → Encoding Source #

NFData (PParams era) ⇒ NFData (LedgerEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

Methods

rnf ∷ LedgerEnv era → () #

Generic (LedgerEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

Associated Types

type Rep (LedgerEnv era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type Rep (LedgerEnv era) = D1 ('MetaData "LedgerEnv" "Cardano.Ledger.Shelley.Rules.Ledger" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "LedgerEnv" 'PrefixI 'True) ((S1 ('MetaSel ('Just "ledgerSlotNo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 SlotNo) :*: S1 ('MetaSel ('Just "ledgerEpochNo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe EpochNo))) :*: (S1 ('MetaSel ('Just "ledgerIx") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 TxIx) :*: (S1 ('MetaSel ('Just "ledgerPp") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PParams era)) :*: S1 ('MetaSel ('Just "ledgerAccount") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ChainAccountState)))))

Methods

from ∷ LedgerEnv era → Rep (LedgerEnv era) x #

to ∷ Rep (LedgerEnv era) x → LedgerEnv era #

Show (PParams era) ⇒ Show (LedgerEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

Methods

showsPrec ∷ Int → LedgerEnv era → ShowS #

show ∷ LedgerEnv era → String #

showList ∷ [LedgerEnv era] → ShowS #

Eq (PParams era) ⇒ Eq (LedgerEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

Methods

(==) ∷ LedgerEnv era → LedgerEnv era → Bool #

(/=) ∷ LedgerEnv era → LedgerEnv era → Bool #

type Rep (LedgerEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type Rep (LedgerEnv era) = D1 ('MetaData "LedgerEnv" "Cardano.Ledger.Shelley.Rules.Ledger" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "LedgerEnv" 'PrefixI 'True) ((S1 ('MetaSel ('Just "ledgerSlotNo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 SlotNo) :*: S1 ('MetaSel ('Just "ledgerEpochNo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe EpochNo))) :*: (S1 ('MetaSel ('Just "ledgerIx") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 TxIx) :*: (S1 ('MetaSel ('Just "ledgerPp") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PParams era)) :*: S1 ('MetaSel ('Just "ledgerAccount") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ChainAccountState)))))

data ShelleyLedgerPredFailure era Source #

Instances

Instances details
InjectRuleFailure "BBODY" ShelleyLedgerPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

InjectRuleFailure "LEDGER" ShelleyLedgerPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

InjectRuleFailure "LEDGERS" ShelleyLedgerPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

(DecCBOR (PredicateFailure (EraRule "DELEGS" era)), DecCBOR (PredicateFailure (EraRule "UTXOW" era)), Era era) ⇒ DecCBOR (ShelleyLedgerPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

(EncCBOR (PredicateFailure (EraRule "DELEGS" era)), EncCBOR (PredicateFailure (EraRule "UTXOW" era)), Era era) ⇒ EncCBOR (ShelleyLedgerPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

(NFData (PredicateFailure (EraRule "DELEGS" era)), NFData (PredicateFailure (EraRule "UTXOW" era)), Era era) ⇒ NFData (ShelleyLedgerPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

Methods

rnf ∷ ShelleyLedgerPredFailure era → () #

Generic (ShelleyLedgerPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

Associated Types

type Rep (ShelleyLedgerPredFailure era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type Rep (ShelleyLedgerPredFailure era) = D1 ('MetaData "ShelleyLedgerPredFailure" "Cardano.Ledger.Shelley.Rules.Ledger" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) ((C1 ('MetaCons "UtxowFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PredicateFailure (EraRule "UTXOW" era)))) :+: C1 ('MetaCons "DelegsFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PredicateFailure (EraRule "DELEGS" era))))) :+: (C1 ('MetaCons "ShelleyWithdrawalsMissingAccounts" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Withdrawals)) :+: C1 ('MetaCons "ShelleyIncompleteWithdrawals" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmptyMap AccountAddress (Mismatch 'RelEQ Coin))))))
(Show (PredicateFailure (EraRule "DELEGS" era)), Show (PredicateFailure (EraRule "UTXOW" era)), Era era) ⇒ Show (ShelleyLedgerPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

(Eq (PredicateFailure (EraRule "DELEGS" era)), Eq (PredicateFailure (EraRule "UTXOW" era)), Era era) ⇒ Eq (ShelleyLedgerPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

(Ord (PredicateFailure (EraRule "DELEGS" era)), Ord (PredicateFailure (EraRule "UTXOW" era)), Era era) ⇒ Ord (ShelleyLedgerPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type Rep (ShelleyLedgerPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type Rep (ShelleyLedgerPredFailure era) = D1 ('MetaData "ShelleyLedgerPredFailure" "Cardano.Ledger.Shelley.Rules.Ledger" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) ((C1 ('MetaCons "UtxowFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PredicateFailure (EraRule "UTXOW" era)))) :+: C1 ('MetaCons "DelegsFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PredicateFailure (EraRule "DELEGS" era))))) :+: (C1 ('MetaCons "ShelleyWithdrawalsMissingAccounts" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Withdrawals)) :+: C1 ('MetaCons "ShelleyIncompleteWithdrawals" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmptyMap AccountAddress (Mismatch 'RelEQ Coin))))))

ledgerPpL ∷ ∀ era f. Functor f ⇒ (PParams era → f (PParams era)) → LedgerEnv era → f (LedgerEnv era) Source #

ledgerSlotNoL ∷ ∀ era f. Functor f ⇒ (SlotNo → f SlotNo) → LedgerEnv era → f (LedgerEnv era) Source #

data LEDGER era Source #

Instances

Instances details
(EraTx era, EraGov era, EraCertState era, Embed (EraRule "DELEGS" era) (LEDGER era), Embed (EraRule "UTXOW" era) (LEDGER era), Environment (EraRule "UTXOW" era) ~ UtxoEnv era, State (EraRule "UTXOW" era) ~ UTxOState era, Signal (EraRule "UTXOW" era) ~ StAnnTx 'TopTx era, Environment (EraRule "DELEGS" era) ~ DelegsEnv era, State (EraRule "DELEGS" era) ~ CertState era, Signal (EraRule "DELEGS" era) ~ Seq (TxCert era), AtMostEra "Babbage" era, EraRule "LEDGER" era ~ LEDGER era, EraRuleFailure "LEDGER" era ~ ShelleyLedgerPredFailure era, InjectRuleFailure "LEDGER" ShelleyLedgerPredFailure era) ⇒ STS (LEDGER era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

Associated Types

type State (LEDGER era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type State (LEDGER era) = LedgerState era
type Signal (LEDGER era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type Signal (LEDGER era) = StAnnTx 'TopTx era
type Environment (LEDGER era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type Environment (LEDGER era) = LedgerEnv era
type BaseM (LEDGER era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type BaseM (LEDGER era) = ShelleyBase
type Event (LEDGER era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type PredicateFailure (LEDGER era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

(Era era, STS (DELEGS era), PredicateFailure (EraRule "DELEGS" era) ~ ShelleyDelegsPredFailure era, Event (EraRule "DELEGS" era) ~ ShelleyDelegsEvent era) ⇒ Embed (DELEGS era) (LEDGER era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

(Era era, STS (LEDGER era), PredicateFailure (EraRule "LEDGER" era) ~ ShelleyLedgerPredFailure era, Event (EraRule "LEDGER" era) ~ ShelleyLedgerEvent era) ⇒ Embed (LEDGER era) (LEDGERS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

(STS (UTXOW era), PredicateFailure (EraRule "UTXOW" era) ~ ShelleyUtxowPredFailure era, Event (EraRule "UTXOW" era) ~ Event (UTXOW era)) ⇒ Embed (UTXOW era) (LEDGER era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type BaseM (LEDGER era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type BaseM (LEDGER era) = ShelleyBase
type Environment (LEDGER era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type Environment (LEDGER era) = LedgerEnv era
type Event (LEDGER era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type PredicateFailure (LEDGER era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type Signal (LEDGER era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type Signal (LEDGER era) = StAnnTx 'TopTx era
type State (LEDGER era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type State (LEDGER era) = LedgerState era

ledgerEpochNoL ∷ ∀ era f. Functor f ⇒ (Maybe EpochNo → f (Maybe EpochNo)) → LedgerEnv era → f (LedgerEnv era) Source #

ledgerIxL ∷ ∀ era f. Functor f ⇒ (TxIx → f TxIx) → LedgerEnv era → f (LedgerEnv era) Source #

ledgerAccountL ∷ ∀ era f. Functor f ⇒ (ChainAccountState → f ChainAccountState) → LedgerEnv era → f (LedgerEnv era) Source #

data ShelleyLedgerEvent era Source #

Constructors

UtxowEvent (Event (EraRule "UTXOW" era)) 
DelegsEvent (Event (EraRule "DELEGS" era)) 

Instances

Instances details
(NFData (Event (EraRule "UTXOW" era)), NFData (Event (EraRule "DELEGS" era))) ⇒ NFData (ShelleyLedgerEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

Methods

rnf ∷ ShelleyLedgerEvent era → () #

Generic (ShelleyLedgerEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

Associated Types

type Rep (ShelleyLedgerEvent era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type Rep (ShelleyLedgerEvent era) = D1 ('MetaData "ShelleyLedgerEvent" "Cardano.Ledger.Shelley.Rules.Ledger" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "UtxowEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "UTXOW" era)))) :+: C1 ('MetaCons "DelegsEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "DELEGS" era)))))
(Eq (Event (EraRule "UTXOW" era)), Eq (Event (EraRule "DELEGS" era))) ⇒ Eq (ShelleyLedgerEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type Rep (ShelleyLedgerEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type Rep (ShelleyLedgerEvent era) = D1 ('MetaData "ShelleyLedgerEvent" "Cardano.Ledger.Shelley.Rules.Ledger" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "UtxowEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "UTXOW" era)))) :+: C1 ('MetaCons "DelegsEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "DELEGS" era)))))

shelleyLedgerAssertions ∷ (EraGov era, EraCertState era, State (rule era) ~ LedgerState era) ⇒ [Assertion (rule era)] Source #

testIncompleteAndMissingWithdrawals ∷ ∀ era sts (ctx ∷ RuleType). (EraAccounts era, STS sts, BaseM sts ~ ShelleyBase, InjectRuleFailure "LEDGER" ShelleyLedgerPredFailure era, sts ~ EraRule "LEDGER" era) ⇒ Accounts era → Withdrawals → Rule sts ctx () Source #

data ShelleyLedgersEnv era Source #

Instances

Instances details
EraPParams era ⇒ EncCBOR (ShelleyLedgersEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

NFData (PParamsHKD Identity era) ⇒ NFData (ShelleyLedgersEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

Methods

rnf ∷ ShelleyLedgersEnv era → () #

Generic (ShelleyLedgersEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

Associated Types

type Rep (ShelleyLedgersEnv era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type Rep (ShelleyLedgersEnv era) = D1 ('MetaData "ShelleyLedgersEnv" "Cardano.Ledger.Shelley.Rules.Ledgers" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "LedgersEnv" 'PrefixI 'True) ((S1 ('MetaSel ('Just "ledgersSlotNo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 SlotNo) :*: S1 ('MetaSel ('Just "ledgersEpochNo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EpochNo)) :*: (S1 ('MetaSel ('Just "ledgersPp") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PParams era)) :*: S1 ('MetaSel ('Just "ledgersAccount") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ChainAccountState))))

Methods

from ∷ ShelleyLedgersEnv era → Rep (ShelleyLedgersEnv era) x #

to ∷ Rep (ShelleyLedgersEnv era) x → ShelleyLedgersEnv era #

Show (PParamsHKD Identity era) ⇒ Show (ShelleyLedgersEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

Eq (PParamsHKD Identity era) ⇒ Eq (ShelleyLedgersEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type Rep (ShelleyLedgersEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type Rep (ShelleyLedgersEnv era) = D1 ('MetaData "ShelleyLedgersEnv" "Cardano.Ledger.Shelley.Rules.Ledgers" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "LedgersEnv" 'PrefixI 'True) ((S1 ('MetaSel ('Just "ledgersSlotNo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 SlotNo) :*: S1 ('MetaSel ('Just "ledgersEpochNo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EpochNo)) :*: (S1 ('MetaSel ('Just "ledgersPp") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PParams era)) :*: S1 ('MetaSel ('Just "ledgersAccount") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ChainAccountState))))

data LEDGERS era Source #

Instances

Instances details
(ApplyTx era, EraGov era, EraStake era, Default (CertState era), Embed (EraRule "LEDGER" era) (LEDGERS era), Environment (EraRule "LEDGER" era) ~ LedgerEnv era, State (EraRule "LEDGER" era) ~ LedgerState era, Signal (EraRule "LEDGER" era) ~ StAnnTx 'TopTx era, Default (LedgerState era)) ⇒ STS (LEDGERS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

Associated Types

type State (LEDGERS era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type State (LEDGERS era) = LedgerState era
type Signal (LEDGERS era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type Signal (LEDGERS era) = Seq (Tx 'TopTx era)
type Environment (LEDGERS era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type BaseM (LEDGERS era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type Event (LEDGERS era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type PredicateFailure (LEDGERS era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

(Era era, STS (LEDGER era), PredicateFailure (EraRule "LEDGER" era) ~ ShelleyLedgerPredFailure era, Event (EraRule "LEDGER" era) ~ ShelleyLedgerEvent era) ⇒ Embed (LEDGER era) (LEDGERS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type BaseM (LEDGERS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type Environment (LEDGERS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type Event (LEDGERS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type PredicateFailure (LEDGERS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type Signal (LEDGERS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type Signal (LEDGERS era) = Seq (Tx 'TopTx era)
type State (LEDGERS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type State (LEDGERS era) = LedgerState era

newtype ShelleyLedgersPredFailure era Source #

Constructors

LedgerFailure (PredicateFailure (EraRule "LEDGER" era)) 

Instances

Instances details
InjectRuleFailure "BBODY" ShelleyLedgersPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

InjectRuleFailure "LEDGERS" ShelleyLedgersPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

(Era era, DecCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ DecCBOR (ShelleyLedgersPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

(Era era, EncCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ EncCBOR (ShelleyLedgersPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

NFData (PredicateFailure (EraRule "LEDGER" era)) ⇒ NFData (ShelleyLedgersPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

Methods

rnf ∷ ShelleyLedgersPredFailure era → () #

Generic (ShelleyLedgersPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

Associated Types

type Rep (ShelleyLedgersPredFailure era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type Rep (ShelleyLedgersPredFailure era) = D1 ('MetaData "ShelleyLedgersPredFailure" "Cardano.Ledger.Shelley.Rules.Ledgers" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "LedgerFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PredicateFailure (EraRule "LEDGER" era)))))
(Era era, Show (PredicateFailure (EraRule "LEDGER" era))) ⇒ Show (ShelleyLedgersPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

(Era era, Eq (PredicateFailure (EraRule "LEDGER" era))) ⇒ Eq (ShelleyLedgersPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

(Era era, Ord (PredicateFailure (EraRule "LEDGER" era))) ⇒ Ord (ShelleyLedgersPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type Rep (ShelleyLedgersPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type Rep (ShelleyLedgersPredFailure era) = D1 ('MetaData "ShelleyLedgersPredFailure" "Cardano.Ledger.Shelley.Rules.Ledgers" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "LedgerFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PredicateFailure (EraRule "LEDGER" era)))))

newtype ShelleyLedgersEvent era Source #

Constructors

LedgerEvent (Event (EraRule "LEDGER" era)) 

Instances

Instances details
Generic (ShelleyLedgersEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

Associated Types

type Rep (ShelleyLedgersEvent era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type Rep (ShelleyLedgersEvent era) = D1 ('MetaData "ShelleyLedgersEvent" "Cardano.Ledger.Shelley.Rules.Ledgers" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "LedgerEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "LEDGER" era)))))
Eq (Event (EraRule "LEDGER" era)) ⇒ Eq (ShelleyLedgersEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type Rep (ShelleyLedgersEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type Rep (ShelleyLedgersEvent era) = D1 ('MetaData "ShelleyLedgersEvent" "Cardano.Ledger.Shelley.Rules.Ledgers" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "LedgerEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "LEDGER" era)))))

data PoolEnv era Source #

Constructors

PoolEnv EpochNo (PParams era) 

Instances

Instances details
EraPParams era ⇒ EncCBOR (PoolEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

Methods

encCBOR ∷ PoolEnv era → Encoding Source #

NFData (PParams era) ⇒ NFData (PoolEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

Methods

rnf ∷ PoolEnv era → () #

Generic (PoolEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

Associated Types

type Rep (PoolEnv era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type Rep (PoolEnv era) = D1 ('MetaData "PoolEnv" "Cardano.Ledger.Shelley.Rules.Pool" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "PoolEnv" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EpochNo) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PParams era))))

Methods

from ∷ PoolEnv era → Rep (PoolEnv era) x #

to ∷ Rep (PoolEnv era) x → PoolEnv era #

Show (PParams era) ⇒ Show (PoolEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

Methods

showsPrec ∷ Int → PoolEnv era → ShowS #

show ∷ PoolEnv era → String #

showList ∷ [PoolEnv era] → ShowS #

Eq (PParams era) ⇒ Eq (PoolEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

Methods

(==) ∷ PoolEnv era → PoolEnv era → Bool #

(/=) ∷ PoolEnv era → PoolEnv era → Bool #

type Rep (PoolEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type Rep (PoolEnv era) = D1 ('MetaData "PoolEnv" "Cardano.Ledger.Shelley.Rules.Pool" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "PoolEnv" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EpochNo) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PParams era))))

data POOL era Source #

Instances

Instances details
(EraPParams era, EraRule "POOL" era ~ POOL era, InjectRuleFailure "POOL" ShelleyPoolPredFailure era, InjectRuleEvent "POOL" PoolEvent era) ⇒ STS (POOL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

Associated Types

type State (POOL era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type State (POOL era) = PState era
type Signal (POOL era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type Signal (POOL era) = PoolCert era
type Environment (POOL era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type Environment (POOL era) = PoolEnv era
type BaseM (POOL era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type BaseM (POOL era) = ShelleyBase
type Event (POOL era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type Event (POOL era) = PoolEvent era
type PredicateFailure (POOL era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

(Era era, STS (POOL era), PredicateFailure (EraRule "POOL" era) ~ ShelleyPoolPredFailure era, Event (EraRule "POOL" era) ~ PoolEvent era) ⇒ Embed (POOL era) (DELPL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type BaseM (POOL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type BaseM (POOL era) = ShelleyBase
type Environment (POOL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type Environment (POOL era) = PoolEnv era
type Event (POOL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type Event (POOL era) = PoolEvent era
type PredicateFailure (POOL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type Signal (POOL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type Signal (POOL era) = PoolCert era
type State (POOL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type State (POOL era) = PState era

data ShelleyPoolPredFailure era Source #

Constructors

StakePoolNotRegisteredOnKeyPOOL 

Fields

StakePoolRetirementWrongEpochPOOL (Mismatch 'RelGT EpochNo) (Mismatch 'RelLTEQ EpochNo) 
StakePoolCostTooLowPOOL (Mismatch 'RelGTEQ Coin) 
WrongNetworkPOOL 

Fields

PoolMedataHashTooBig 

Fields

VRFKeyHashAlreadyRegistered 

Fields

Instances

Instances details
InjectRuleFailure "BBODY" ShelleyPoolPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

InjectRuleFailure "DELEGS" ShelleyPoolPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

InjectRuleFailure "DELPL" ShelleyPoolPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

InjectRuleFailure "LEDGER" ShelleyPoolPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

InjectRuleFailure "LEDGERS" ShelleyPoolPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

InjectRuleFailure "POOL" ShelleyPoolPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

Era era ⇒ DecCBOR (ShelleyPoolPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

Era era ⇒ EncCBOR (ShelleyPoolPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

NFData (ShelleyPoolPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

Methods

rnf ∷ ShelleyPoolPredFailure era → () #

Generic (ShelleyPoolPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

Associated Types

type Rep (ShelleyPoolPredFailure era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type Rep (ShelleyPoolPredFailure era) = D1 ('MetaData "ShelleyPoolPredFailure" "Cardano.Ledger.Shelley.Rules.Pool" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) ((C1 ('MetaCons "StakePoolNotRegisteredOnKeyPOOL" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'StakePool))) :+: (C1 ('MetaCons "StakePoolRetirementWrongEpochPOOL" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelGT EpochNo)) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelLTEQ EpochNo))) :+: C1 ('MetaCons "StakePoolCostTooLowPOOL" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelGTEQ Coin))))) :+: (C1 ('MetaCons "WrongNetworkPOOL" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelEQ Network)) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'StakePool))) :+: (C1 ('MetaCons "PoolMedataHashTooBig" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'StakePool)) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int)) :+: C1 ('MetaCons "VRFKeyHashAlreadyRegistered" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'StakePool)) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (VRFVerKeyHash 'StakePoolVRF))))))
Show (ShelleyPoolPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

Eq (ShelleyPoolPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

Ord (ShelleyPoolPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type Rep (ShelleyPoolPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type Rep (ShelleyPoolPredFailure era) = D1 ('MetaData "ShelleyPoolPredFailure" "Cardano.Ledger.Shelley.Rules.Pool" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) ((C1 ('MetaCons "StakePoolNotRegisteredOnKeyPOOL" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'StakePool))) :+: (C1 ('MetaCons "StakePoolRetirementWrongEpochPOOL" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelGT EpochNo)) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelLTEQ EpochNo))) :+: C1 ('MetaCons "StakePoolCostTooLowPOOL" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelGTEQ Coin))))) :+: (C1 ('MetaCons "WrongNetworkPOOL" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelEQ Network)) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'StakePool))) :+: (C1 ('MetaCons "PoolMedataHashTooBig" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'StakePool)) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int)) :+: C1 ('MetaCons "VRFKeyHashAlreadyRegistered" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'StakePool)) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (VRFVerKeyHash 'StakePoolVRF))))))

data PoolEvent era Source #

Instances

Instances details
InjectRuleEvent "POOL" PoolEvent ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

NFData (PoolEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

Methods

rnf ∷ PoolEvent era → () #

Generic (PoolEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

Associated Types

type Rep (PoolEvent era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type Rep (PoolEvent era) = D1 ('MetaData "PoolEvent" "Cardano.Ledger.Shelley.Rules.Pool" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "RegisterPool" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'StakePool))) :+: C1 ('MetaCons "ReregisterPool" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'StakePool))))

Methods

from ∷ PoolEvent era → Rep (PoolEvent era) x #

to ∷ Rep (PoolEvent era) x → PoolEvent era #

Eq (PoolEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

Methods

(==) ∷ PoolEvent era → PoolEvent era → Bool #

(/=) ∷ PoolEvent era → PoolEvent era → Bool #

type Rep (PoolEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type Rep (PoolEvent era) = D1 ('MetaData "PoolEvent" "Cardano.Ledger.Shelley.Rules.Pool" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "RegisterPool" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'StakePool))) :+: C1 ('MetaCons "ReregisterPool" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'StakePool))))

poolTransition ∷ ∀ (rule ∷ Symbol) era. (EraPParams era, Signal (EraRule rule era) ~ PoolCert era, Environment (EraRule rule era) ~ PoolEnv era, State (EraRule rule era) ~ PState era, STS (EraRule rule era), BaseM (EraRule rule era) ~ ShelleyBase, InjectRuleFailure rule ShelleyPoolPredFailure era, InjectRuleEvent rule PoolEvent era) ⇒ TransitionRule (EraRule rule era) Source #

data ShelleyGovState era Source #

Constructors

ShelleyGovState 

Fields

Instances

Instances details
EraPParams era ⇒ ToJSON (ShelleyGovState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

(Era era, DecCBOR (PParamsUpdate era), DecCBOR (PParams era)) ⇒ FromCBOR (ShelleyGovState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

(Era era, EncCBOR (PParamsUpdate era), EncCBOR (PParams era)) ⇒ ToCBOR (ShelleyGovState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

Methods

toCBOR ∷ ShelleyGovState era → Encoding Source #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyGovState era) → Size Source #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyGovState era] → Size Source #

(Era era, DecCBOR (PParamsUpdate era), DecCBOR (PParams era)) ⇒ DecCBOR (ShelleyGovState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

(Era era, DecCBOR (PParamsUpdate era), DecCBOR (PParams era)) ⇒ DecShareCBOR (ShelleyGovState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

(Era era, EncCBOR (PParamsUpdate era), EncCBOR (PParams era)) ⇒ EncCBOR (ShelleyGovState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

EraPParams era ⇒ ToKeyValuePairs (ShelleyGovState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

Methods

toKeyValuePairs ∷ KeyValue e kv ⇒ ShelleyGovState era → [kv] Source #

EraPParams era ⇒ Default (ShelleyGovState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

Methods

def ∷ ShelleyGovState era Source #

(NFData (PParamsUpdate era), NFData (PParams era)) ⇒ NFData (ShelleyGovState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

Methods

rnf ∷ ShelleyGovState era → () #

Generic (ShelleyGovState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

Associated Types

type Rep (ShelleyGovState era) 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

type Rep (ShelleyGovState era) = D1 ('MetaData "ShelleyGovState" "Cardano.Ledger.Shelley.Governance" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "ShelleyGovState" 'PrefixI 'True) ((S1 ('MetaSel ('Just "sgsCurProposals") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (ProposedPPUpdates era)) :*: S1 ('MetaSel ('Just "sgsFutureProposals") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (ProposedPPUpdates era))) :*: (S1 ('MetaSel ('Just "sgsCurPParams") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (PParams era)) :*: (S1 ('MetaSel ('Just "sgsPrevPParams") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (PParams era)) :*: S1 ('MetaSel ('Just "sgsFuturePParams") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (FuturePParams era))))))

Methods

from ∷ ShelleyGovState era → Rep (ShelleyGovState era) x #

to ∷ Rep (ShelleyGovState era) x → ShelleyGovState era #

(Show (PParamsUpdate era), Show (PParams era)) ⇒ Show (ShelleyGovState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

Methods

showsPrec ∷ Int → ShelleyGovState era → ShowS #

show ∷ ShelleyGovState era → String #

showList ∷ [ShelleyGovState era] → ShowS #

(Eq (PParamsUpdate era), Eq (PParams era)) ⇒ Eq (ShelleyGovState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

Methods

(==) ∷ ShelleyGovState era → ShelleyGovState era → Bool #

(/=) ∷ ShelleyGovState era → ShelleyGovState era → Bool #

(Ord (PParamsUpdate era), Ord (PParams era)) ⇒ Ord (ShelleyGovState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

(NoThunks (PParamsUpdate era), NoThunks (PParams era)) ⇒ NoThunks (ShelleyGovState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

type Share (ShelleyGovState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

type Rep (ShelleyGovState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Governance

type Rep (ShelleyGovState era) = D1 ('MetaData "ShelleyGovState" "Cardano.Ledger.Shelley.Governance" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "ShelleyGovState" 'PrefixI 'True) ((S1 ('MetaSel ('Just "sgsCurProposals") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (ProposedPPUpdates era)) :*: S1 ('MetaSel ('Just "sgsFutureProposals") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (ProposedPPUpdates era))) :*: (S1 ('MetaSel ('Just "sgsCurPParams") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (PParams era)) :*: (S1 ('MetaSel ('Just "sgsPrevPParams") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (PParams era)) :*: S1 ('MetaSel ('Just "sgsFuturePParams") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (FuturePParams era))))))

data PpupEnv era Source #

Constructors

PPUPEnv SlotNo (PParams era) GenDelegs 

data PPUP era Source #

Instances

Instances details
(EraPParams era, AtMostEra "Babbage" era) ⇒ STS (PPUP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

Associated Types

type State (PPUP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type State (PPUP era) = ShelleyGovState era
type Signal (PPUP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type Signal (PPUP era) = StrictMaybe (Update era)
type Environment (PPUP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type Environment (PPUP era) = PpupEnv era
type BaseM (PPUP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type BaseM (PPUP era) = ShelleyBase
type Event (PPUP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type Event (PPUP era) = PpupEvent era
type PredicateFailure (PPUP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

(Era era, STS (PPUP era), EraRuleFailure "PPUP" era ~ ShelleyPpupPredFailure era, Event (EraRule "PPUP" era) ~ PpupEvent era) ⇒ Embed (PPUP era) (UTXO era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type BaseM (PPUP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type BaseM (PPUP era) = ShelleyBase
type Environment (PPUP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type Environment (PPUP era) = PpupEnv era
type Event (PPUP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type Event (PPUP era) = PpupEvent era
type PredicateFailure (PPUP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type Signal (PPUP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type Signal (PPUP era) = StrictMaybe (Update era)
type State (PPUP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type State (PPUP era) = ShelleyGovState era

data ShelleyPpupPredFailure era Source #

Constructors

NonGenesisUpdatePPUP (Mismatch 'RelSubset (Set (KeyHash 'GenesisRole)))

An update was proposed by a key hash that is not one of the genesis keys. mismatchSupplied ~ key hashes which were a part of the update. mismatchExpected ~ key hashes of the genesis keys.

PPUpdateWrongEpoch EpochNo EpochNo VotingPeriod

An update was proposed for the wrong epoch. The first EpochNo is the current epoch. The second EpochNo is the epoch listed in the update. The last parameter indicates if the update was intended for the current or the next epoch.

PVCannotFollowPPUP ProtVer

An update was proposed which contains an invalid protocol version. New protocol versions must either increase the major number by exactly one and set the minor version to zero, or keep the major version the same and increase the minor version by exactly one.

Instances

Instances details
InjectRuleFailure "BBODY" ShelleyPpupPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

InjectRuleFailure "LEDGER" ShelleyPpupPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

InjectRuleFailure "LEDGERS" ShelleyPpupPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

InjectRuleFailure "PPUP" ShelleyPpupPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

InjectRuleFailure "UTXO" ShelleyPpupPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

InjectRuleFailure "UTXOW" ShelleyPpupPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

Era era ⇒ DecCBOR (ShelleyPpupPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

Era era ⇒ EncCBOR (ShelleyPpupPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

NFData (ShelleyPpupPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

Methods

rnf ∷ ShelleyPpupPredFailure era → () #

Generic (ShelleyPpupPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

Show (ShelleyPpupPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

Eq (ShelleyPpupPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

Ord (ShelleyPpupPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type Rep (ShelleyPpupPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

votedFuturePParams Source #

Arguments

∷ EraPParams era 
⇒ ProposedPPUpdates era 
→ PParams era

Protocol parameters to which the change will be applied.

→ Word64

Quorum needed to change the protocol parameters.

→ Maybe (PParams era) 

If at least n nodes voted to change the same protocol parameters to the same values, return the given protocol parameters updated to these values. Here n is the quorum needed.

newtype PpupEvent era Source #

Constructors

PpupNewEpoch EpochNo 

Instances

Instances details
NFData (PpupEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

Methods

rnf ∷ PpupEvent era → () #

Generic (PpupEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

Associated Types

type Rep (PpupEvent era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type Rep (PpupEvent era) = D1 ('MetaData "PpupEvent" "Cardano.Ledger.Shelley.Rules.Ppup" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "PpupNewEpoch" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EpochNo)))

Methods

from ∷ PpupEvent era → Rep (PpupEvent era) x #

to ∷ Rep (PpupEvent era) x → PpupEvent era #

Eq (PpupEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

Methods

(==) ∷ PpupEvent era → PpupEvent era → Bool #

(/=) ∷ PpupEvent era → PpupEvent era → Bool #

type Rep (PpupEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type Rep (PpupEvent era) = D1 ('MetaData "PpupEvent" "Cardano.Ledger.Shelley.Rules.Ppup" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "PpupNewEpoch" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EpochNo)))

data VotingPeriod Source #

Instances

Instances details
DecCBOR VotingPeriod Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

EncCBOR VotingPeriod Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

NFData VotingPeriod Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

Methods

rnf ∷ VotingPeriod → () #

Generic VotingPeriod Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

Associated Types

type Rep VotingPeriod 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type Rep VotingPeriod = D1 ('MetaData "VotingPeriod" "Cardano.Ledger.Shelley.Rules.Ppup" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "VoteForThisEpoch" 'PrefixI 'False) (U1 ∷ Type → Type) :+: C1 ('MetaCons "VoteForNextEpoch" 'PrefixI 'False) (U1 ∷ Type → Type))
Show VotingPeriod Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

Eq VotingPeriod Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

Ord VotingPeriod Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

NoThunks VotingPeriod Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type Rep VotingPeriod Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type Rep VotingPeriod = D1 ('MetaData "VotingPeriod" "Cardano.Ledger.Shelley.Rules.Ppup" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "VoteForThisEpoch" 'PrefixI 'False) (U1 ∷ Type → Type) :+: C1 ('MetaCons "VoteForNextEpoch" 'PrefixI 'False) (U1 ∷ Type → Type))

data UtxoEnv era Source #

Constructors

UtxoEnv 

Fields

Instances

Instances details
(EraPParams era, EraCertState era, Typeable (CertState era)) ⇒ DecCBOR (UtxoEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

Methods

decCBOR ∷ Decoder s (UtxoEnv era) Source #

dropCBOR ∷ Proxy (UtxoEnv era) → Decoder s () Source #

label ∷ Proxy (UtxoEnv era) → Text Source #

(EraPParams era, EraCertState era) ⇒ EncCBOR (UtxoEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

Methods

encCBOR ∷ UtxoEnv era → Encoding Source #

(Era era, NFData (PParams era), NFData (CertState era)) ⇒ NFData (UtxoEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

Methods

rnf ∷ UtxoEnv era → () #

Generic (UtxoEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

Associated Types

type Rep (UtxoEnv era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type Rep (UtxoEnv era) = D1 ('MetaData "UtxoEnv" "Cardano.Ledger.Shelley.Rules.Utxo" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "UtxoEnv" 'PrefixI 'True) (S1 ('MetaSel ('Just "ueSlot") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 SlotNo) :*: (S1 ('MetaSel ('Just "uePParams") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PParams era)) :*: S1 ('MetaSel ('Just "ueCertState") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (CertState era)))))

Methods

from ∷ UtxoEnv era → Rep (UtxoEnv era) x #

to ∷ Rep (UtxoEnv era) x → UtxoEnv era #

(Show (PParams era), Show (CertState era)) ⇒ Show (UtxoEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

Methods

showsPrec ∷ Int → UtxoEnv era → ShowS #

show ∷ UtxoEnv era → String #

showList ∷ [UtxoEnv era] → ShowS #

(Eq (PParams era), Eq (CertState era)) ⇒ Eq (UtxoEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

Methods

(==) ∷ UtxoEnv era → UtxoEnv era → Bool #

(/=) ∷ UtxoEnv era → UtxoEnv era → Bool #

type Rep (UtxoEnv era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type Rep (UtxoEnv era) = D1 ('MetaData "UtxoEnv" "Cardano.Ledger.Shelley.Rules.Utxo" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "UtxoEnv" 'PrefixI 'True) (S1 ('MetaSel ('Just "ueSlot") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 SlotNo) :*: (S1 ('MetaSel ('Just "uePParams") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PParams era)) :*: S1 ('MetaSel ('Just "ueCertState") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (CertState era)))))

data UTXO era Source #

Instances

Instances details
(EraTx era, EraUTxO era, EraStake era, ShelleyEraTxBody era, EraGov era, GovState era ~ ShelleyGovState era, ExactEra ShelleyEra era, Embed (EraRule "PPUP" era) (UTXO era), Environment (EraRule "PPUP" era) ~ PpupEnv era, Signal (EraRule "PPUP" era) ~ StrictMaybe (Update era), State (EraRule "PPUP" era) ~ ShelleyGovState era, Ord (EraRuleFailure "PPUP" era), Show (EraRuleFailure "PPUP" era), EraRule "UTXO" era ~ UTXO era, InjectRuleFailure "UTXO" ShelleyUtxoPredFailure era, EraCertState era, SafeToHash (TxWits era)) ⇒ STS (UTXO era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

Associated Types

type State (UTXO era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type State (UTXO era) = UTxOState era
type Signal (UTXO era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type Signal (UTXO era) = StAnnTx 'TopTx era
type Environment (UTXO era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type Environment (UTXO era) = UtxoEnv era
type BaseM (UTXO era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type BaseM (UTXO era) = ShelleyBase
type Event (UTXO era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type Event (UTXO era) = UtxoEvent era
type PredicateFailure (UTXO era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

(Era era, STS (PPUP era), EraRuleFailure "PPUP" era ~ ShelleyPpupPredFailure era, Event (EraRule "PPUP" era) ~ PpupEvent era) ⇒ Embed (PPUP era) (UTXO era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

(Era era, STS (UTXO era), PredicateFailure (EraRule "UTXO" era) ~ ShelleyUtxoPredFailure era, Event (EraRule "UTXO" era) ~ UtxoEvent era) ⇒ Embed (UTXO era) (UTXOW era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type BaseM (UTXO era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type BaseM (UTXO era) = ShelleyBase
type Environment (UTXO era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type Environment (UTXO era) = UtxoEnv era
type Event (UTXO era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type Event (UTXO era) = UtxoEvent era
type PredicateFailure (UTXO era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type Signal (UTXO era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type Signal (UTXO era) = StAnnTx 'TopTx era
type State (UTXO era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type State (UTXO era) = UTxOState era

data ShelleyUtxoPredFailure era Source #

Instances

Instances details
InjectRuleFailure "BBODY" ShelleyUtxoPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

InjectRuleFailure "LEDGER" ShelleyUtxoPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

InjectRuleFailure "LEDGERS" ShelleyUtxoPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

InjectRuleFailure "UTXO" ShelleyUtxoPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

InjectRuleFailure "UTXOW" ShelleyUtxoPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

(EraTxOut era, DecCBOR (EraRuleFailure "PPUP" era)) ⇒ DecCBOR (ShelleyUtxoPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

(Era era, EncCBOR (Value era), EncCBOR (TxOut era), EncCBOR (EraRuleFailure "PPUP" era)) ⇒ EncCBOR (ShelleyUtxoPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

(Era era, NFData (Value era), NFData (TxOut era), NFData (EraRuleFailure "PPUP" era)) ⇒ NFData (ShelleyUtxoPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

Methods

rnf ∷ ShelleyUtxoPredFailure era → () #

Generic (ShelleyUtxoPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

Associated Types

type Rep (ShelleyUtxoPredFailure era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type Rep (ShelleyUtxoPredFailure era) = D1 ('MetaData "ShelleyUtxoPredFailure" "Cardano.Ledger.Shelley.Rules.Utxo" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (((C1 ('MetaCons "BadInputsUTxO" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmptySet TxIn))) :+: C1 ('MetaCons "ExpiredUTxO" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelLTEQ SlotNo)))) :+: (C1 ('MetaCons "MaxTxSizeUTxO" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelLTEQ Word32))) :+: (C1 ('MetaCons "InputSetEmptyUTxO" 'PrefixI 'False) (U1 ∷ Type → Type) :+: C1 ('MetaCons "FeeTooSmallUTxO" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelGTEQ Coin)))))) :+: ((C1 ('MetaCons "ValueNotConservedUTxO" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelEQ (Value era)))) :+: (C1 ('MetaCons "WrongNetwork" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Network) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmptySet Addr))) :+: C1 ('MetaCons "WrongNetworkWithdrawal" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Network) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmptySet AccountAddress))))) :+: (C1 ('MetaCons "OutputTooSmallUTxO" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmpty (TxOut era)))) :+: (C1 ('MetaCons "UpdateFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (EraRuleFailure "PPUP" era))) :+: C1 ('MetaCons "OutputBootAddrAttrsTooBig" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmpty (TxOut era))))))))
(Show (Value era), Show (TxOut era), Show (EraRuleFailure "PPUP" era)) ⇒ Show (ShelleyUtxoPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

(Eq (Value era), Eq (TxOut era), Eq (EraRuleFailure "PPUP" era)) ⇒ Eq (ShelleyUtxoPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

(Ord (Value era), Ord (TxOut era), Ord (EraRuleFailure "PPUP" era)) ⇒ Ord (ShelleyUtxoPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type Rep (ShelleyUtxoPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type Rep (ShelleyUtxoPredFailure era) = D1 ('MetaData "ShelleyUtxoPredFailure" "Cardano.Ledger.Shelley.Rules.Utxo" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (((C1 ('MetaCons "BadInputsUTxO" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmptySet TxIn))) :+: C1 ('MetaCons "ExpiredUTxO" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelLTEQ SlotNo)))) :+: (C1 ('MetaCons "MaxTxSizeUTxO" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelLTEQ Word32))) :+: (C1 ('MetaCons "InputSetEmptyUTxO" 'PrefixI 'False) (U1 ∷ Type → Type) :+: C1 ('MetaCons "FeeTooSmallUTxO" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelGTEQ Coin)))))) :+: ((C1 ('MetaCons "ValueNotConservedUTxO" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelEQ (Value era)))) :+: (C1 ('MetaCons "WrongNetwork" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Network) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmptySet Addr))) :+: C1 ('MetaCons "WrongNetworkWithdrawal" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Network) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmptySet AccountAddress))))) :+: (C1 ('MetaCons "OutputTooSmallUTxO" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmpty (TxOut era)))) :+: (C1 ('MetaCons "UpdateFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (EraRuleFailure "PPUP" era))) :+: C1 ('MetaCons "OutputBootAddrAttrsTooBig" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmpty (TxOut era))))))))

data UtxoEvent era Source #

Constructors

TotalDeposits (SafeHash EraIndependentTxBody) Coin 
UpdateEvent (Event (EraRule "PPUP" era)) 
TxUTxODiff

The UTxOs consumed and created by a signal tx

Fields

  • (UTxO era)

    UTxO consumed

  • (UTxO era)

    UTxO created

Instances

Instances details
(Era era, NFData (Event (EraRule "PPUP" era)), NFData (TxOut era)) ⇒ NFData (UtxoEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

Methods

rnf ∷ UtxoEvent era → () #

Generic (UtxoEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

Associated Types

type Rep (UtxoEvent era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

Methods

from ∷ UtxoEvent era → Rep (UtxoEvent era) x #

to ∷ Rep (UtxoEvent era) x → UtxoEvent era #

(Era era, Eq (TxOut era), Eq (Event (EraRule "PPUP" era))) ⇒ Eq (UtxoEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

Methods

(==) ∷ UtxoEvent era → UtxoEvent era → Bool #

(/=) ∷ UtxoEvent era → UtxoEvent era → Bool #

type Rep (UtxoEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

validSizeComputationCheck ∷ (EraTx era, SafeToHash (TxWits era), Signal (rule era) ~ StAnnTx 'TopTx era) ⇒ Assertion (rule era) Source #

updateUTxOState ∷ (EraTxBody era, EraStake era, EraCertState era, Monad m) ⇒ PParams era → TxBody 'TopTx era → CertState era → (Coin → m ()) → (UTxO era → UTxO era → m ()) → UTxOState era → m (UTxOState era) Source #

This monadic action captures the final stages of the UTXO(S) rule. In particular it applies all of the UTxO related aditions and removals, gathers all of the fees into the fee pot utxosFees and updates the utxosDeposited field. Continuation supplied will be called on the deposit - refund change, which is normally used to emit the TotalDeposits event.

updateUTxOStateDeposits ∷ (EraTxBody era, EraCertState era, Monad m) ⇒ PParams era → CertState era → TxBody 'TopTx era → (Coin → m ()) → UTxOState era → m (UTxOState era) Source #

updateUTxOAndInstantStake ∷ ∀ era m (l ∷ TxLevel). (EraTxBody era, EraStake era, Monad m) ⇒ TxBody l era → (UTxO era → UTxO era → m ()) → UTxOState era → m (UTxOState era) Source #

Apply the txBody's inputs/outputs to the UTxO map and to the instant stake, firing the diff event.

validateInputSetEmptyUTxO ∷ ∀ era (t ∷ TxLevel). EraTxBody era ⇒ TxBody t era → Test (ShelleyUtxoPredFailure era) Source #

Ensure that there is at least one input in the TxBody

txins txb ≠ ∅

validateFeeTooSmallUTxO ∷ EraUTxO era ⇒ PParams era → Tx 'TopTx era → UTxO era → Test (ShelleyUtxoPredFailure era) Source #

Ensure that the fee is at least the amount specified by the minfee

minfee pp tx ≤ txfee txb

validateBadInputsUTxO ∷ UTxO era → Set TxIn → Test (ShelleyUtxoPredFailure era) Source #

Ensure all transaction inputs are present in UTxO

inputs ⊆ dom utxo

validateWrongNetwork ∷ (EraTxOut era, Foldable f) ⇒ Network → f (TxOut era) → Test (ShelleyUtxoPredFailure era) Source #

Make sure all addresses match the supplied NetworkId

∀(_ → (a, _)) ∈ txouts txb, netId a = NetworkId

validateWrongNetworkWithdrawal ∷ ∀ era (t ∷ TxLevel). EraTxBody era ⇒ Network → TxBody t era → Test (ShelleyUtxoPredFailure era) Source #

Make sure all addresses match the supplied NetworkId

∀(a → ) ∈ txwdrls txb, netId a = NetworkId

validateOutputBootAddrAttrsTooBig ∷ (EraTxOut era, Foldable f) ⇒ f (TxOut era) → Test (ShelleyUtxoPredFailure era) Source #

Bootstrap (i.e. Byron) addresses have variable sized attributes in them. It is important to limit their overall size.

∀ ( _ ↦ (a,_)) ∈ txoutstxb,  a ∈ Addrbootstrap → bootstrapAttrsSize a ≤ 64

validateMaxTxSizeUTxO ∷ ∀ era (l ∷ TxLevel). EraTx era ⇒ PParams era → Tx l era → Test (ShelleyUtxoPredFailure era) Source #

Ensure that the size of the transaction does not exceed the maxTxSize protocol parameter

txsize tx ≤ maxTxSize pp

validateValueNotConservedUTxO ∷ (EraUTxO era, EraCertState era) ⇒ PParams era → UTxO era → CertState era → TxBody 'TopTx era → Test (ShelleyUtxoPredFailure era) Source #

Ensure that value consumed and produced matches up exactly

consumed pp utxo txb = produced pp poolParams txb

utxoEnvSlotL ∷ ∀ era f. Functor f ⇒ (SlotNo → f SlotNo) → UtxoEnv era → f (UtxoEnv era) Source #

utxoEnvPParamsL ∷ ∀ era f. Functor f ⇒ (PParams era → f (PParams era)) → UtxoEnv era → f (UtxoEnv era) Source #

utxoEnvCertStateL ∷ ∀ era f. Functor f ⇒ (CertState era → f (CertState era)) → UtxoEnv era → f (UtxoEnv era) Source #

data UTXOW era Source #

Instances

Instances details
(EraTx era, EraUTxO era, ShelleyEraTxBody era, ScriptsNeeded era ~ ShelleyScriptsNeeded era, Embed (EraRule "UTXO" era) (UTXOW era), Environment (EraRule "UTXO" era) ~ UtxoEnv era, State (EraRule "UTXO" era) ~ UTxOState era, Signal (EraRule "UTXO" era) ~ StAnnTx 'TopTx era, EraRule "UTXOW" era ~ UTXOW era, InjectRuleFailure "UTXOW" ShelleyUtxowPredFailure era, EraGov era, EraCertState era) ⇒ STS (UTXOW era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

Associated Types

type State (UTXOW era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type State (UTXOW era) = UTxOState era
type Signal (UTXOW era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type Signal (UTXOW era) = StAnnTx 'TopTx era
type Environment (UTXOW era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type Environment (UTXOW era) = UtxoEnv era
type BaseM (UTXOW era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type BaseM (UTXOW era) = ShelleyBase
type Event (UTXOW era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type Event (UTXOW era) = ShelleyUtxowEvent era
type PredicateFailure (UTXOW era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

(Era era, STS (UTXO era), PredicateFailure (EraRule "UTXO" era) ~ ShelleyUtxoPredFailure era, Event (EraRule "UTXO" era) ~ UtxoEvent era) ⇒ Embed (UTXO era) (UTXOW era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

(STS (UTXOW era), PredicateFailure (EraRule "UTXOW" era) ~ ShelleyUtxowPredFailure era, Event (EraRule "UTXOW" era) ~ Event (UTXOW era)) ⇒ Embed (UTXOW era) (LEDGER era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type BaseM (UTXOW era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type BaseM (UTXOW era) = ShelleyBase
type Environment (UTXOW era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type Environment (UTXOW era) = UtxoEnv era
type Event (UTXOW era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type Event (UTXOW era) = ShelleyUtxowEvent era
type PredicateFailure (UTXOW era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type Signal (UTXOW era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type Signal (UTXOW era) = StAnnTx 'TopTx era
type State (UTXOW era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type State (UTXOW era) = UTxOState era

data ShelleyUtxowPredFailure era Source #

Instances

Instances details
InjectRuleFailure "BBODY" ShelleyUtxowPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

InjectRuleFailure "LEDGER" ShelleyUtxowPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

InjectRuleFailure "LEDGERS" ShelleyUtxowPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

InjectRuleFailure "UTXOW" ShelleyUtxowPredFailure ShelleyEra Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

(Era era, DecCBOR (PredicateFailure (EraRule "UTXO" era)), Typeable (Script era), Typeable (TxAuxData era)) ⇒ DecCBOR (ShelleyUtxowPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

(Era era, EncCBOR (PredicateFailure (EraRule "UTXO" era))) ⇒ EncCBOR (ShelleyUtxowPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

(NFData (PredicateFailure (EraRule "UTXO" era)), Era era) ⇒ NFData (ShelleyUtxowPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

Methods

rnf ∷ ShelleyUtxowPredFailure era → () #

Generic (ShelleyUtxowPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

Associated Types

type Rep (ShelleyUtxowPredFailure era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type Rep (ShelleyUtxowPredFailure era) = D1 ('MetaData "ShelleyUtxowPredFailure" "Cardano.Ledger.Shelley.Rules.Utxow" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (((C1 ('MetaCons "InvalidWitnessesUTXOW" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmpty (VKey 'Witness)))) :+: C1 ('MetaCons "MissingVKeyWitnessesUTXOW" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmptySet (KeyHash 'Witness))))) :+: (C1 ('MetaCons "MissingScriptWitnessesUTXOW" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmptySet ScriptHash))) :+: (C1 ('MetaCons "ScriptWitnessNotValidatingUTXOW" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmptySet ScriptHash))) :+: C1 ('MetaCons "UtxoFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PredicateFailure (EraRule "UTXO" era))))))) :+: ((C1 ('MetaCons "MIRInsufficientGenesisSigsUTXOW" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Set (KeyHash 'Witness)))) :+: (C1 ('MetaCons "MissingTxBodyMetadataHash" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 TxAuxDataHash)) :+: C1 ('MetaCons "MissingTxMetadata" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 TxAuxDataHash)))) :+: (C1 ('MetaCons "ConflictingMetadataHash" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelEQ TxAuxDataHash))) :+: (C1 ('MetaCons "InvalidMetadata" 'PrefixI 'False) (U1 ∷ Type → Type) :+: C1 ('MetaCons "ExtraneousScriptWitnessesUTXOW" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmptySet ScriptHash)))))))
(Show (PredicateFailure (EraRule "UTXO" era)), Era era) ⇒ Show (ShelleyUtxowPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

(Eq (PredicateFailure (EraRule "UTXO" era)), Era era) ⇒ Eq (ShelleyUtxowPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

(Ord (PredicateFailure (EraRule "UTXO" era)), Era era) ⇒ Ord (ShelleyUtxowPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type Rep (ShelleyUtxowPredFailure era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type Rep (ShelleyUtxowPredFailure era) = D1 ('MetaData "ShelleyUtxowPredFailure" "Cardano.Ledger.Shelley.Rules.Utxow" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (((C1 ('MetaCons "InvalidWitnessesUTXOW" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmpty (VKey 'Witness)))) :+: C1 ('MetaCons "MissingVKeyWitnessesUTXOW" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmptySet (KeyHash 'Witness))))) :+: (C1 ('MetaCons "MissingScriptWitnessesUTXOW" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmptySet ScriptHash))) :+: (C1 ('MetaCons "ScriptWitnessNotValidatingUTXOW" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmptySet ScriptHash))) :+: C1 ('MetaCons "UtxoFailure" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (PredicateFailure (EraRule "UTXO" era))))))) :+: ((C1 ('MetaCons "MIRInsufficientGenesisSigsUTXOW" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Set (KeyHash 'Witness)))) :+: (C1 ('MetaCons "MissingTxBodyMetadataHash" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 TxAuxDataHash)) :+: C1 ('MetaCons "MissingTxMetadata" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 TxAuxDataHash)))) :+: (C1 ('MetaCons "ConflictingMetadataHash" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Mismatch 'RelEQ TxAuxDataHash))) :+: (C1 ('MetaCons "InvalidMetadata" 'PrefixI 'False) (U1 ∷ Type → Type) :+: C1 ('MetaCons "ExtraneousScriptWitnessesUTXOW" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (NonEmptySet ScriptHash)))))))

newtype ShelleyUtxowEvent era Source #

Constructors

UtxoEvent (Event (EraRule "UTXO" era)) 

Instances

Instances details
NFData (Event (EraRule "UTXO" era)) ⇒ NFData (ShelleyUtxowEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

Methods

rnf ∷ ShelleyUtxowEvent era → () #

Generic (ShelleyUtxowEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

Associated Types

type Rep (ShelleyUtxowEvent era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type Rep (ShelleyUtxowEvent era) = D1 ('MetaData "ShelleyUtxowEvent" "Cardano.Ledger.Shelley.Rules.Utxow" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "UtxoEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "UTXO" era)))))

Methods

from ∷ ShelleyUtxowEvent era → Rep (ShelleyUtxowEvent era) x #

to ∷ Rep (ShelleyUtxowEvent era) x → ShelleyUtxowEvent era #

Eq (Event (EraRule "UTXO" era)) ⇒ Eq (ShelleyUtxowEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type Rep (ShelleyUtxowEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type Rep (ShelleyUtxowEvent era) = D1 ('MetaData "ShelleyUtxowEvent" "Cardano.Ledger.Shelley.Rules.Utxow" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "UtxoEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "UTXO" era)))))

transitionRulesUTXOW ∷ (EraUTxO era, ShelleyEraTxBody era, ScriptsNeeded era ~ ShelleyScriptsNeeded era, BaseM (EraRule "UTXOW" era) ~ ShelleyBase, Embed (EraRule "UTXO" era) (EraRule "UTXOW" era), Environment (EraRule "UTXO" era) ~ UtxoEnv era, State (EraRule "UTXO" era) ~ UTxOState era, Signal (EraRule "UTXO" era) ~ StAnnTx 'TopTx era, Environment (EraRule "UTXOW" era) ~ UtxoEnv era, State (EraRule "UTXOW" era) ~ UTxOState era, Signal (EraRule "UTXOW" era) ~ StAnnTx 'TopTx era, InjectRuleFailure "UTXOW" ShelleyUtxowPredFailure era, STS (EraRule "UTXOW" era), EraCertState era) ⇒ TransitionRule (EraRule "UTXOW" era) Source #

A generic Utxow witnessing function designed to be used across many Eras. Note the embed argument lifts from the simple Shelley (ShelleyUtxowPredFailure) to the PredicateFailure (type family) of the context of where it is called.

validateFailedNativeScripts ∷ ∀ era (l ∷ TxLevel). EraTx era ⇒ ScriptsProvided era → Tx l era → Test (ShelleyUtxowPredFailure era) Source #

validateVerifiedWits ∷ ∀ era (l ∷ TxLevel). EraTx era ⇒ Tx l era → Test (ShelleyUtxowPredFailure era) Source #

Determine if the UTxO witnesses in a given transaction are correct.

validateMetadata ∷ ∀ era (l ∷ TxLevel). EraTx era ⇒ PParams era → StAnnTx l era → Test (ShelleyUtxowPredFailure era) Source #

check metadata hash ((adh = ◇) ∧ (ad= ◇)) ∨ (adh = hashAD ad)

validateMIRInsufficientGenesisSigs ∷ (EraTx era, ShelleyEraTxBody era) ⇒ GenDelegs → Word64 → Set (KeyHash 'Witness) → Tx 'TopTx era → Test (ShelleyUtxowPredFailure era) Source #

check genesis keys signatures for instantaneous rewards certificates

genSig := { hashKey gkey | gkey ∈ dom(genDelegs)} ∩ witsKeyHashes { c ∈ txcerts txb ∩ TxCert_mir} ≠ ∅ ⇒ |genSig| ≥ Quorum

validateNeededWitnesses Source #

Arguments

∷ ∀ era (t ∷ TxLevel). EraUTxO era 
⇒ Set (KeyHash 'Witness)

Provided witness

→ CertState era 
→ UTxO era 
→ TxBody t era 
→ Test (ShelleyUtxowPredFailure era) 

Verify that we provide at least all of the required witnesses

witsVKeyNeeded utxo tx ⊆ witsKeyHashes

Tick

data EPOCH era Source #

Instances

Instances details
(EraTxOut era, EraGov era, EraStake era, EraCertState era, GovState era ~ ShelleyGovState era, Embed (EraRule "SNAP" era) (EPOCH era), Environment (EraRule "SNAP" era) ~ SnapEnv era, State (EraRule "SNAP" era) ~ SnapShots era, Signal (EraRule "SNAP" era) ~ EpochNo, Embed (EraRule "POOLREAP" era) (EPOCH era), Environment (EraRule "POOLREAP" era) ~ (), State (EraRule "POOLREAP" era) ~ ShelleyPoolreapState era, Signal (EraRule "POOLREAP" era) ~ EpochNo, Embed (EraRule "UPEC" era) (EPOCH era), Environment (EraRule "UPEC" era) ~ LedgerState era, State (EraRule "UPEC" era) ~ UpecState era, Signal (EraRule "UPEC" era) ~ (), Default (PParams era)) ⇒ STS (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

Associated Types

type State (EPOCH era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type State (EPOCH era) = EpochState era
type Signal (EPOCH era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type Signal (EPOCH era) = EpochNo
type Environment (EPOCH era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type Environment (EPOCH era) = ()
type BaseM (EPOCH era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type BaseM (EPOCH era) = ShelleyBase
type Event (EPOCH era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type Event (EPOCH era) = ShelleyEpochEvent era
type PredicateFailure (EPOCH era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

(STS (EPOCH era), Event (EraRule "EPOCH" era) ~ ShelleyEpochEvent era) ⇒ Embed (EPOCH era) (NEWEPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

(Era era, STS (POOLREAP era), Event (EraRule "POOLREAP" era) ~ ShelleyPoolreapEvent era) ⇒ Embed (POOLREAP era) (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

(EraTxOut era, EraStake era, Event (EraRule "SNAP" era) ~ SnapEvent era, EraCertState era) ⇒ Embed (SNAP era) (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

(Era era, STS (UPEC era), Event (EraRule "UPEC" era) ~ Void) ⇒ Embed (UPEC era) (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type BaseM (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type BaseM (EPOCH era) = ShelleyBase
type Environment (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type Environment (EPOCH era) = ()
type Event (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type Event (EPOCH era) = ShelleyEpochEvent era
type PredicateFailure (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type Signal (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type Signal (EPOCH era) = EpochNo
type State (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type State (EPOCH era) = EpochState era

data ShelleyEpochEvent era Source #

Constructors

PoolReapEvent (Event (EraRule "POOLREAP" era)) 
SnapEvent (Event (EraRule "SNAP" era)) 
UpecEvent (Event (EraRule "UPEC" era)) 

Instances

Instances details
(NFData (Event (EraRule "POOLREAP" era)), NFData (Event (EraRule "SNAP" era)), NFData (Event (EraRule "UPEC" era))) ⇒ NFData (ShelleyEpochEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

Methods

rnf ∷ ShelleyEpochEvent era → () #

Generic (ShelleyEpochEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

Associated Types

type Rep (ShelleyEpochEvent era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type Rep (ShelleyEpochEvent era) = D1 ('MetaData "ShelleyEpochEvent" "Cardano.Ledger.Shelley.Rules.Epoch" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "PoolReapEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "POOLREAP" era)))) :+: (C1 ('MetaCons "SnapEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "SNAP" era)))) :+: C1 ('MetaCons "UpecEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "UPEC" era))))))

Methods

from ∷ ShelleyEpochEvent era → Rep (ShelleyEpochEvent era) x #

to ∷ Rep (ShelleyEpochEvent era) x → ShelleyEpochEvent era #

(Eq (Event (EraRule "POOLREAP" era)), Eq (Event (EraRule "SNAP" era)), Eq (Event (EraRule "UPEC" era))) ⇒ Eq (ShelleyEpochEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type Rep (ShelleyEpochEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type Rep (ShelleyEpochEvent era) = D1 ('MetaData "ShelleyEpochEvent" "Cardano.Ledger.Shelley.Rules.Epoch" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "PoolReapEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "POOLREAP" era)))) :+: (C1 ('MetaCons "SnapEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "SNAP" era)))) :+: C1 ('MetaCons "UpecEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "UPEC" era))))))

data NEWEPOCH era Source #

Instances

Instances details
(EraTxOut era, EraGov era, EraStake era, EraCertState era, Embed (EraRule "MIR" era) (NEWEPOCH era), Embed (EraRule "EPOCH" era) (NEWEPOCH era), Environment (EraRule "MIR" era) ~ (), State (EraRule "MIR" era) ~ EpochState era, Signal (EraRule "MIR" era) ~ (), Event (EraRule "RUPD" era) ~ RupdEvent, Environment (EraRule "EPOCH" era) ~ (), State (EraRule "EPOCH" era) ~ EpochState era, Signal (EraRule "EPOCH" era) ~ EpochNo, Default (EpochState era), Default (State (EraRule "PPUP" era)), Default (PParams era), Default (StashedAVVMAddresses era)) ⇒ STS (NEWEPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

Associated Types

type State (NEWEPOCH era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type State (NEWEPOCH era) = NewEpochState era
type Signal (NEWEPOCH era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type Signal (NEWEPOCH era) = EpochNo
type Environment (NEWEPOCH era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type Environment (NEWEPOCH era) = ()
type BaseM (NEWEPOCH era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type Event (NEWEPOCH era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type PredicateFailure (NEWEPOCH era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

(STS (EPOCH era), Event (EraRule "EPOCH" era) ~ ShelleyEpochEvent era) ⇒ Embed (EPOCH era) (NEWEPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

(EraGov era, EraCertState era, Default (EpochState era), Event (EraRule "MIR" era) ~ ShelleyMirEvent era) ⇒ Embed (MIR era) (NEWEPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

(STS (NEWEPOCH era), Event (EraRule "NEWEPOCH" era) ~ ShelleyNewEpochEvent era) ⇒ Embed (NEWEPOCH era) (TICK era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type BaseM (NEWEPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type Environment (NEWEPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type Environment (NEWEPOCH era) = ()
type Event (NEWEPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type PredicateFailure (NEWEPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type Signal (NEWEPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type Signal (NEWEPOCH era) = EpochNo
type State (NEWEPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type State (NEWEPOCH era) = NewEpochState era

data ShelleyNewEpochEvent era Source #

Instances

Instances details
(NFData (Event (EraRule "EPOCH" era)), NFData (Event (EraRule "MIR" era)), NFData (Event (EraRule "RUPD" era))) ⇒ NFData (ShelleyNewEpochEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

Methods

rnf ∷ ShelleyNewEpochEvent era → () #

Generic (ShelleyNewEpochEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

Associated Types

type Rep (ShelleyNewEpochEvent era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type Rep (ShelleyNewEpochEvent era) = D1 ('MetaData "ShelleyNewEpochEvent" "Cardano.Ledger.Shelley.Rules.NewEpoch" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) ((C1 ('MetaCons "DeltaRewardEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "RUPD" era)))) :+: (C1 ('MetaCons "RestrainedRewards" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EpochNo) :*: (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map (Credential 'Staking) (Set Reward))) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Set (Credential 'Staking))))) :+: C1 ('MetaCons "TotalRewardEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EpochNo) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map (Credential 'Staking) (Set Reward)))))) :+: (C1 ('MetaCons "EpochEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "EPOCH" era)))) :+: (C1 ('MetaCons "MirEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "MIR" era)))) :+: C1 ('MetaCons "TotalAdaPotsEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 AdaPots)))))
(Eq (Event (EraRule "EPOCH" era)), Eq (Event (EraRule "MIR" era)), Eq (Event (EraRule "RUPD" era))) ⇒ Eq (ShelleyNewEpochEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type Rep (ShelleyNewEpochEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type Rep (ShelleyNewEpochEvent era) = D1 ('MetaData "ShelleyNewEpochEvent" "Cardano.Ledger.Shelley.Rules.NewEpoch" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) ((C1 ('MetaCons "DeltaRewardEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "RUPD" era)))) :+: (C1 ('MetaCons "RestrainedRewards" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EpochNo) :*: (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map (Credential 'Staking) (Set Reward))) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Set (Credential 'Staking))))) :+: C1 ('MetaCons "TotalRewardEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EpochNo) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map (Credential 'Staking) (Set Reward)))))) :+: (C1 ('MetaCons "EpochEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "EPOCH" era)))) :+: (C1 ('MetaCons "MirEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "MIR" era)))) :+: C1 ('MetaCons "TotalAdaPotsEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 AdaPots)))))

data RUPD era Source #

Instances

Instances details
(Era era, EraGov era, EraCertState era) ⇒ STS (RUPD era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

Associated Types

type State (RUPD era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

type Signal (RUPD era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

type Signal (RUPD era) = SlotNo
type Environment (RUPD era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

type Environment (RUPD era) = RupdEnv era
type BaseM (RUPD era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

type BaseM (RUPD era) = ShelleyBase
type Event (RUPD era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

type Event (RUPD era) = RupdEvent
type PredicateFailure (RUPD era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

(Era era, STS (RUPD era), Event (EraRule "RUPD" era) ~ RupdEvent) ⇒ Embed (RUPD era) (TICK era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type BaseM (RUPD era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

type BaseM (RUPD era) = ShelleyBase
type Environment (RUPD era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

type Environment (RUPD era) = RupdEnv era
type Event (RUPD era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

type Event (RUPD era) = RupdEvent
type PredicateFailure (RUPD era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

type Signal (RUPD era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

type Signal (RUPD era) = SlotNo
type State (RUPD era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

data RupdEvent Source #

Instances

Instances details
NFData RupdEvent Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

Methods

rnf ∷ RupdEvent → () #

Generic RupdEvent Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

Associated Types

type Rep RupdEvent 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

type Rep RupdEvent = D1 ('MetaData "RupdEvent" "Cardano.Ledger.Shelley.Rules.Rupd" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "RupdEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 EpochNo) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (Map (Credential 'Staking) (Set Reward)))))

Methods

from ∷ RupdEvent → Rep RupdEvent x #

to ∷ Rep RupdEvent x → RupdEvent #

Eq RupdEvent Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

Methods

(==) ∷ RupdEvent → RupdEvent → Bool #

(/=) ∷ RupdEvent → RupdEvent → Bool #

type Rep RupdEvent Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

type Rep RupdEvent = D1 ('MetaData "RupdEvent" "Cardano.Ledger.Shelley.Rules.Rupd" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "RupdEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 EpochNo) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (Map (Credential 'Staking) (Set Reward)))))

data RupdEnv era Source #

Constructors

RupdEnv BlocksMade (EpochState era) 

data SnapEnv era Source #

Constructors

SnapEnv (LedgerState era) (PParams era) 

data SNAP era Source #

Instances

Instances details
(EraTxOut era, EraStake era, EraCertState era) ⇒ STS (SNAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

Associated Types

type State (SNAP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type State (SNAP era) = SnapShots era
type Signal (SNAP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type Signal (SNAP era) = EpochNo
type Environment (SNAP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type Environment (SNAP era) = SnapEnv era
type BaseM (SNAP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type BaseM (SNAP era) = ShelleyBase
type Event (SNAP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type Event (SNAP era) = SnapEvent era
type PredicateFailure (SNAP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

(EraTxOut era, EraStake era, Event (EraRule "SNAP" era) ~ SnapEvent era, EraCertState era) ⇒ Embed (SNAP era) (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type BaseM (SNAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type BaseM (SNAP era) = ShelleyBase
type Environment (SNAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type Environment (SNAP era) = SnapEnv era
type Event (SNAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type Event (SNAP era) = SnapEvent era
type PredicateFailure (SNAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type Signal (SNAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type Signal (SNAP era) = EpochNo
type State (SNAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type State (SNAP era) = SnapShots era

newtype SnapEvent era Source #

Instances

Instances details
NFData (SnapEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

Methods

rnf ∷ SnapEvent era → () #

Generic (SnapEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

Associated Types

type Rep (SnapEvent era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type Rep (SnapEvent era) = D1 ('MetaData "SnapEvent" "Cardano.Ledger.Shelley.Rules.Snap" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "StakeDistEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map (Credential 'Staking) (Coin, KeyHash 'StakePool)))))

Methods

from ∷ SnapEvent era → Rep (SnapEvent era) x #

to ∷ Rep (SnapEvent era) x → SnapEvent era #

Eq (SnapEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

Methods

(==) ∷ SnapEvent era → SnapEvent era → Bool #

(/=) ∷ SnapEvent era → SnapEvent era → Bool #

type Rep (SnapEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type Rep (SnapEvent era) = D1 ('MetaData "SnapEvent" "Cardano.Ledger.Shelley.Rules.Snap" "cardano-ledger-shelley-1.20.0.0-inplace" 'True) (C1 ('MetaCons "StakeDistEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map (Credential 'Staking) (Coin, KeyHash 'StakePool)))))

type family State a Source #

Type of the state which the system transitions between.

Instances

Instances details
type State (BBODY era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type State (BBODY era) = ShelleyBbodyState era
type State (DELEG era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type State (DELEG era) = CertState era
type State (DELEGS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type State (DELEGS era) = CertState era
type State (DELPL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type State (DELPL era) = CertState era
type State (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type State (EPOCH era) = EpochState era
type State (LEDGER era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type State (LEDGER era) = LedgerState era
type State (LEDGERS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type State (LEDGERS era) = LedgerState era
type State (MIR era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

type State (MIR era) = EpochState era
type State (NEWEPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type State (NEWEPOCH era) = NewEpochState era
type State (NEWPP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

type State (NEWPP era) = ShelleyNewppState era
type State (POOL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type State (POOL era) = PState era
type State (POOLREAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type State (PPUP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type State (PPUP era) = ShelleyGovState era
type State (RUPD era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

type State (SNAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type State (SNAP era) = SnapShots era
type State (TICK era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type State (TICK era) = NewEpochState era
type State (TICKF era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type State (TICKF era) = NewEpochState era
type State (UPEC era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

type State (UPEC era) = UpecState era
type State (UTXO era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type State (UTXO era) = UTxOState era
type State (UTXOW era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type State (UTXOW era) = UTxOState era
type State (STUB e st si f m) 
Instance details

Defined in Control.State.Transition.Extended

type State (STUB e st si f m) = st

type family State a Source #

Type of the state which the system transitions between.

Instances

Instances details
type State (BBODY era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Bbody

type State (BBODY era) = ShelleyBbodyState era
type State (DELEG era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Deleg

type State (DELEG era) = CertState era
type State (DELEGS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delegs

type State (DELEGS era) = CertState era
type State (DELPL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Delpl

type State (DELPL era) = CertState era
type State (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type State (EPOCH era) = EpochState era
type State (LEDGER era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledger

type State (LEDGER era) = LedgerState era
type State (LEDGERS era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ledgers

type State (LEDGERS era) = LedgerState era
type State (MIR era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

type State (MIR era) = EpochState era
type State (NEWEPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type State (NEWEPOCH era) = NewEpochState era
type State (NEWPP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

type State (NEWPP era) = ShelleyNewppState era
type State (POOL era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Pool

type State (POOL era) = PState era
type State (POOLREAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type State (PPUP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Ppup

type State (PPUP era) = ShelleyGovState era
type State (RUPD era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Rupd

type State (SNAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Snap

type State (SNAP era) = SnapShots era
type State (TICK era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type State (TICK era) = NewEpochState era
type State (TICKF era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type State (TICKF era) = NewEpochState era
type State (UPEC era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

type State (UPEC era) = UpecState era
type State (UTXO era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxo

type State (UTXO era) = UTxOState era
type State (UTXOW era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Utxow

type State (UTXOW era) = UTxOState era
type State (STUB e st si f m) 
Instance details

Defined in Control.State.Transition.Extended

type State (STUB e st si f m) = st

data TICK era Source #

Instances

Instances details
(EraGov era, EraCertState era, Embed (EraRule "NEWEPOCH" era) (TICK era), Embed (EraRule "RUPD" era) (TICK era), State (TICK era) ~ NewEpochState era, BaseM (TICK era) ~ ShelleyBase, Environment (EraRule "RUPD" era) ~ RupdEnv era, State (EraRule "RUPD" era) ~ StrictMaybe PulsingRewUpdate, Signal (EraRule "RUPD" era) ~ SlotNo, Environment (EraRule "NEWEPOCH" era) ~ (), State (EraRule "NEWEPOCH" era) ~ NewEpochState era, Signal (EraRule "NEWEPOCH" era) ~ EpochNo) ⇒ STS (TICK era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

Associated Types

type State (TICK era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type State (TICK era) = NewEpochState era
type Signal (TICK era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type Signal (TICK era) = SlotNo
type Environment (TICK era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type Environment (TICK era) = ()
type BaseM (TICK era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type BaseM (TICK era) = ShelleyBase
type Event (TICK era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type Event (TICK era) = ShelleyTickEvent era
type PredicateFailure (TICK era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

(STS (NEWEPOCH era), Event (EraRule "NEWEPOCH" era) ~ ShelleyNewEpochEvent era) ⇒ Embed (NEWEPOCH era) (TICK era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

(Era era, STS (RUPD era), Event (EraRule "RUPD" era) ~ RupdEvent) ⇒ Embed (RUPD era) (TICK era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type BaseM (TICK era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type BaseM (TICK era) = ShelleyBase
type Environment (TICK era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type Environment (TICK era) = ()
type Event (TICK era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type Event (TICK era) = ShelleyTickEvent era
type PredicateFailure (TICK era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type Signal (TICK era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type Signal (TICK era) = SlotNo
type State (TICK era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type State (TICK era) = NewEpochState era

data TICKF era Source #

Instances

Instances details
(EraGov era, EraCertState era, GovState era ~ ShelleyGovState era, State (EraRule "PPUP" era) ~ ShelleyGovState era, Signal (EraRule "UPEC" era) ~ (), State (EraRule "UPEC" era) ~ UpecState era, Environment (EraRule "UPEC" era) ~ LedgerState era, Embed (EraRule "UPEC" era) (TICKF era)) ⇒ STS (TICKF era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

Associated Types

type State (TICKF era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type State (TICKF era) = NewEpochState era
type Signal (TICKF era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type Signal (TICKF era) = SlotNo
type Environment (TICKF era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type Environment (TICKF era) = ()
type BaseM (TICKF era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type BaseM (TICKF era) = ShelleyBase
type Event (TICKF era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type Event (TICKF era)
type PredicateFailure (TICKF era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

(Era era, STS (UPEC era), Event (EraRule "UPEC" era) ~ Void) ⇒ Embed (UPEC era) (TICKF era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type BaseM (TICKF era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type BaseM (TICKF era) = ShelleyBase
type Environment (TICKF era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type Environment (TICKF era) = ()
type Event (TICKF era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type Event (TICKF era)
type PredicateFailure (TICKF era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type Signal (TICKF era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type Signal (TICKF era) = SlotNo
type State (TICKF era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type State (TICKF era) = NewEpochState era

data ShelleyTickEvent era Source #

Constructors

TickNewEpochEvent (Event (EraRule "NEWEPOCH" era)) 
TickRupdEvent (Event (EraRule "RUPD" era)) 

Instances

Instances details
(NFData (Event (EraRule "NEWEPOCH" era)), NFData (Event (EraRule "RUPD" era))) ⇒ NFData (ShelleyTickEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

Methods

rnf ∷ ShelleyTickEvent era → () #

Generic (ShelleyTickEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

Associated Types

type Rep (ShelleyTickEvent era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type Rep (ShelleyTickEvent era) = D1 ('MetaData "ShelleyTickEvent" "Cardano.Ledger.Shelley.Rules.Tick" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "TickNewEpochEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "NEWEPOCH" era)))) :+: C1 ('MetaCons "TickRupdEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "RUPD" era)))))

Methods

from ∷ ShelleyTickEvent era → Rep (ShelleyTickEvent era) x #

to ∷ Rep (ShelleyTickEvent era) x → ShelleyTickEvent era #

(Eq (Event (EraRule "NEWEPOCH" era)), Eq (Event (EraRule "RUPD" era))) ⇒ Eq (ShelleyTickEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

Methods

(==) ∷ ShelleyTickEvent era → ShelleyTickEvent era → Bool #

(/=) ∷ ShelleyTickEvent era → ShelleyTickEvent era → Bool #

type Rep (ShelleyTickEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type Rep (ShelleyTickEvent era) = D1 ('MetaData "ShelleyTickEvent" "Cardano.Ledger.Shelley.Rules.Tick" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "TickNewEpochEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "NEWEPOCH" era)))) :+: C1 ('MetaCons "TickRupdEvent" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Event (EraRule "RUPD" era)))))

validatingTickTransition ∷ ∀ tick era. (EraGov era, EraCertState era, Embed (EraRule "NEWEPOCH" era) (tick era), STS (tick era), State (tick era) ~ NewEpochState era, BaseM (tick era) ~ ShelleyBase, Environment (EraRule "NEWEPOCH" era) ~ (), State (EraRule "NEWEPOCH" era) ~ NewEpochState era, Signal (EraRule "NEWEPOCH" era) ~ EpochNo) ⇒ NewEpochState era → SlotNo → TransitionRule (tick era) Source #

This is a limited version of bheadTransition which is suitable for the future ledger view.

validatingTickTransitionFORECAST ∷ (State (tick era) ~ NewEpochState era, BaseM (tick era) ~ ShelleyBase, State (EraRule "UPEC" era) ~ UpecState era, Signal (EraRule "UPEC" era) ~ (), Environment (EraRule "UPEC" era) ~ LedgerState era, Embed (EraRule "UPEC" era) (tick era), STS (tick era), GovState era ~ ShelleyGovState era, EraGov era, EraCertState era) ⇒ NewEpochState era → SlotNo → TransitionRule (tick era) Source #

This is a limited version of validatingTickTransition which is only suitable for the future ledger view.

solidifyNextEpochPParams ∷ EraGov era ⇒ NewEpochState era → SlotNo → ShelleyBase (EpochNo, NewEpochState era) Source #

This action ensures that once the current slot number is at the point of no return we mark the future PParams to be updated at the next epoch boundary. Also returns the current epoch number for convenience.

data UPEC era Source #

Instances

Instances details
(EraGov era, Default (PParams era), GovState era ~ ShelleyGovState era, AtMostEra "Babbage" era) ⇒ STS (UPEC era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

Associated Types

type State (UPEC era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

type State (UPEC era) = UpecState era
type Signal (UPEC era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

type Signal (UPEC era) = ()
type Environment (UPEC era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

type Environment (UPEC era) = LedgerState era
type BaseM (UPEC era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

type BaseM (UPEC era) = ShelleyBase
type Event (UPEC era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

type Event (UPEC era) = Void
type PredicateFailure (UPEC era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

(Era era, STS (NEWPP era)) ⇒ Embed (NEWPP era) (UPEC era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

(Era era, STS (UPEC era), Event (EraRule "UPEC" era) ~ Void) ⇒ Embed (UPEC era) (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

(Era era, STS (UPEC era), Event (EraRule "UPEC" era) ~ Void) ⇒ Embed (UPEC era) (TICKF era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Tick

type BaseM (UPEC era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

type BaseM (UPEC era) = ShelleyBase
type Environment (UPEC era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

type Environment (UPEC era) = LedgerState era
type Event (UPEC era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

type Event (UPEC era) = Void
type PredicateFailure (UPEC era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

type Signal (UPEC era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

type Signal (UPEC era) = ()
type State (UPEC era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

type State (UPEC era) = UpecState era

data UpecState era Source #

Constructors

UpecState 

Fields

Instances

Instances details
(Show (PParams era), Show (PParamsUpdate era)) ⇒ Show (UpecState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

Methods

showsPrec ∷ Int → UpecState era → ShowS #

show ∷ UpecState era → String #

showList ∷ [UpecState era] → ShowS #

data MIR era Source #

Instances

Instances details
(Default (EpochState era), EraGov era, EraCertState era) ⇒ STS (MIR era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

Associated Types

type State (MIR era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

type State (MIR era) = EpochState era
type Signal (MIR era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

type Signal (MIR era) = ()
type Environment (MIR era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

type Environment (MIR era) = ()
type BaseM (MIR era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

type BaseM (MIR era) = ShelleyBase
type Event (MIR era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

type Event (MIR era) = ShelleyMirEvent era
type PredicateFailure (MIR era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

(EraGov era, EraCertState era, Default (EpochState era), Event (EraRule "MIR" era) ~ ShelleyMirEvent era) ⇒ Embed (MIR era) (NEWEPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.NewEpoch

type BaseM (MIR era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

type BaseM (MIR era) = ShelleyBase
type Environment (MIR era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

type Environment (MIR era) = ()
type Event (MIR era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

type Event (MIR era) = ShelleyMirEvent era
type PredicateFailure (MIR era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

type Signal (MIR era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

type Signal (MIR era) = ()
type State (MIR era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

type State (MIR era) = EpochState era

data ShelleyMirEvent era Source #

Constructors

MirTransfer InstantaneousRewards 
NoMirTransfer InstantaneousRewards Coin Coin

We were not able to perform an MIR transfer due to insufficient funds. This event gives the rewards we wanted to pay, plus the available reserves and treasury.

Instances

Instances details
NFData (ShelleyMirEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

Methods

rnf ∷ ShelleyMirEvent era → () #

Generic (ShelleyMirEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

Methods

from ∷ ShelleyMirEvent era → Rep (ShelleyMirEvent era) x #

to ∷ Rep (ShelleyMirEvent era) x → ShelleyMirEvent era #

Eq (ShelleyMirEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

Methods

(==) ∷ ShelleyMirEvent era → ShelleyMirEvent era → Bool #

(/=) ∷ ShelleyMirEvent era → ShelleyMirEvent era → Bool #

type Rep (ShelleyMirEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Mir

data NEWPP era Source #

Instances

Instances details
(EraGov era, GovState era ~ ShelleyGovState era, AtMostEra "Babbage" era) ⇒ STS (NEWPP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

Associated Types

type State (NEWPP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

type State (NEWPP era) = ShelleyNewppState era
type Signal (NEWPP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

type Signal (NEWPP era) = PParams era
type Environment (NEWPP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

type Environment (NEWPP era) = NewppEnv era
type BaseM (NEWPP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

type BaseM (NEWPP era) = ShelleyBase
type Event (NEWPP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

type Event (NEWPP era) = Void
type PredicateFailure (NEWPP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

(Era era, STS (NEWPP era)) ⇒ Embed (NEWPP era) (UPEC era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Upec

type BaseM (NEWPP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

type BaseM (NEWPP era) = ShelleyBase
type Environment (NEWPP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

type Environment (NEWPP era) = NewppEnv era
type Event (NEWPP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

type Event (NEWPP era) = Void
type PredicateFailure (NEWPP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

type Signal (NEWPP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

type Signal (NEWPP era) = PParams era
type State (NEWPP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

type State (NEWPP era) = ShelleyNewppState era

data ShelleyNewppState era Source #

Constructors

NewppState (PParams era) (ShelleyGovState era) 

Instances

Instances details
EraPParams era ⇒ Default (ShelleyNewppState era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Newpp

Methods

def ∷ ShelleyNewppState era Source #

data NewppEnv era Source #

Constructors

NewppEnv 

Fields

data ShelleyPoolreapEvent era Source #

Instances

Instances details
NFData (ShelleyPoolreapEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

Methods

rnf ∷ ShelleyPoolreapEvent era → () #

Generic (ShelleyPoolreapEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

Associated Types

type Rep (ShelleyPoolreapEvent era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type Rep (ShelleyPoolreapEvent era) = D1 ('MetaData "ShelleyPoolreapEvent" "Cardano.Ledger.Shelley.Rules.PoolReap" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "RetiredPools" 'PrefixI 'True) (S1 ('MetaSel ('Just "refundPools") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map (Credential 'Staking) (Map (KeyHash 'StakePool) (CompactForm Coin)))) :*: (S1 ('MetaSel ('Just "unclaimedPools") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map (Credential 'Staking) (Map (KeyHash 'StakePool) (CompactForm Coin)))) :*: S1 ('MetaSel ('Just "epochNo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EpochNo))))
Eq (ShelleyPoolreapEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type Rep (ShelleyPoolreapEvent era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type Rep (ShelleyPoolreapEvent era) = D1 ('MetaData "ShelleyPoolreapEvent" "Cardano.Ledger.Shelley.Rules.PoolReap" "cardano-ledger-shelley-1.20.0.0-inplace" 'False) (C1 ('MetaCons "RetiredPools" 'PrefixI 'True) (S1 ('MetaSel ('Just "refundPools") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map (Credential 'Staking) (Map (KeyHash 'StakePool) (CompactForm Coin)))) :*: (S1 ('MetaSel ('Just "unclaimedPools") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map (Credential 'Staking) (Map (KeyHash 'StakePool) (CompactForm Coin)))) :*: S1 ('MetaSel ('Just "epochNo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 EpochNo))))

data POOLREAP era Source #

Instances

Instances details
(Default (ShelleyPoolreapState era), EraPParams era, EraGov era, EraCertState era) ⇒ STS (POOLREAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

Associated Types

type State (POOLREAP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type Signal (POOLREAP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type Signal (POOLREAP era) = EpochNo
type Environment (POOLREAP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type Environment (POOLREAP era) = ()
type BaseM (POOLREAP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type Event (POOLREAP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type PredicateFailure (POOLREAP era) 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

(Era era, STS (POOLREAP era), Event (EraRule "POOLREAP" era) ~ ShelleyPoolreapEvent era) ⇒ Embed (POOLREAP era) (EPOCH era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.Epoch

type BaseM (POOLREAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type Environment (POOLREAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type Environment (POOLREAP era) = ()
type Event (POOLREAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type PredicateFailure (POOLREAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type Signal (POOLREAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

type Signal (POOLREAP era) = EpochNo
type State (POOLREAP era) Source # 
Instance details

Defined in Cardano.Ledger.Shelley.Rules.PoolReap

prCertStateL ∷ ∀ era f. Functor f ⇒ (CertState era → f (CertState era)) → ShelleyPoolreapState era → f (ShelleyPoolreapState era) Source #

prUTxOStateL ∷ ∀ era f. Functor f ⇒ (UTxOState era → f (UTxOState era)) → ShelleyPoolreapState era → f (ShelleyPoolreapState era) Source #