Safe Haskell | Safe-Inferred |
---|---|
Language | Haskell2010 |
Synopsis
- data ShelleyRUPD era
- data RupdEnv era = RupdEnv !(BlocksMade (EraCrypto era)) !(EpochState era)
- type family PredicateFailure a
- data ShelleyRupdPredFailure era
- epochInfoRange ∷ Monad m ⇒ EpochInfo m → EpochNo → m (SlotNo, SlotNo)
- data PulsingRewUpdate c
- = Pulsing !(RewardSnapShot c) !(Pulser c)
- | Complete !(RewardUpdate c)
- startStep ∷ ∀ era. EraGov era ⇒ EpochSize → BlocksMade (EraCrypto era) → EpochState era → Coin → ActiveSlotCoeff → Word64 → PulsingRewUpdate (EraCrypto era)
- pulseStep ∷ PulsingRewUpdate c → ShelleyBase (PulsingRewUpdate c, RewardEvent c)
- completeStep ∷ PulsingRewUpdate c → ShelleyBase (PulsingRewUpdate c, RewardEvent c)
- lift ∷ (MonadTrans t, Monad m) ⇒ m a → t m a
- newtype Identity a = Identity {
- runIdentity ∷ a
- data RupdEvent c = RupdEvent !EpochNo !(Map (Credential 'Staking c) (Set (Reward c)))
Documentation
data ShelleyRUPD era Source #
Instances
RupdEnv !(BlocksMade (EraCrypto era)) !(EpochState era) |
type family PredicateFailure a Source #
Descriptive type for the possible failures which might cause a transition to fail.
As a convention, PredicateFailure
s which are "structural" (meaning that
they are not "throwable" in practice, and are used to pass control from
one transition rule to another) are prefixed with S_
.
Structural PredicateFailure
s represent conditions between rules where
the disjunction of all rules' preconditions is equal to True
. That is,
either one rule will throw a structural PredicateFailure
and the other
will succeed, or vice-versa.
Instances
data ShelleyRupdPredFailure era Source #
Instances
Generic (ShelleyRupdPredFailure era) Source # | |
Defined in Cardano.Ledger.Shelley.Rules.Rupd from ∷ ShelleyRupdPredFailure era → Rep (ShelleyRupdPredFailure era) x Source # to ∷ Rep (ShelleyRupdPredFailure era) x → ShelleyRupdPredFailure era Source # | |
Show (ShelleyRupdPredFailure era) Source # | |
Defined in Cardano.Ledger.Shelley.Rules.Rupd | |
NFData (ShelleyRupdPredFailure era) Source # | |
Defined in Cardano.Ledger.Shelley.Rules.Rupd rnf ∷ ShelleyRupdPredFailure era → () Source # | |
Eq (ShelleyRupdPredFailure era) Source # | |
Defined in Cardano.Ledger.Shelley.Rules.Rupd (==) ∷ ShelleyRupdPredFailure era → ShelleyRupdPredFailure era → Bool Source # (/=) ∷ ShelleyRupdPredFailure era → ShelleyRupdPredFailure era → Bool Source # | |
NoThunks (ShelleyRupdPredFailure era) Source # | |
Defined in Cardano.Ledger.Shelley.Rules.Rupd | |
type Rep (ShelleyRupdPredFailure era) Source # | |
Defined in Cardano.Ledger.Shelley.Rules.Rupd |
data PulsingRewUpdate c Source #
The state used in the STS rules
Pulsing !(RewardSnapShot c) !(Pulser c) | |
Complete !(RewardUpdate c) |
Instances
startStep ∷ ∀ era. EraGov era ⇒ EpochSize → BlocksMade (EraCrypto era) → EpochState era → Coin → ActiveSlotCoeff → Word64 → PulsingRewUpdate (EraCrypto era) Source #
pulseStep ∷ PulsingRewUpdate c → ShelleyBase (PulsingRewUpdate c, RewardEvent c) Source #
Run the pulser for a bit. If is has nothing left to do, complete it.
completeStep ∷ PulsingRewUpdate c → ShelleyBase (PulsingRewUpdate c, RewardEvent c) Source #
lift ∷ (MonadTrans t, Monad m) ⇒ m a → t m a Source #
Lift a computation from the argument monad to the constructed monad.
Identity functor and monad. (a non-strict monad)
Since: base-4.8.0.0
Identity | |
|
Instances
Instances
Generic (RupdEvent c) Source # | |
NFData (RupdEvent c) Source # | |
Defined in Cardano.Ledger.Shelley.Rules.Rupd | |
Eq (RupdEvent c) Source # | |
type Rep (RupdEvent c) Source # | |
Defined in Cardano.Ledger.Shelley.Rules.Rupd type Rep (RupdEvent c) = D1 ('MetaData "RupdEvent" "Cardano.Ledger.Shelley.Rules.Rupd" "cardano-ledger-shelley-1.11.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 c) (Set (Reward c)))))) |
Orphan instances
(Era era, EraGov era) ⇒ STS (ShelleyRUPD era) Source # | |
type State (ShelleyRUPD era) Source # type Signal (ShelleyRUPD era) Source # type Environment (ShelleyRUPD era) Source # type BaseM (ShelleyRUPD era) ∷ Type → Type Source # type Event (ShelleyRUPD era) Source # type PredicateFailure (ShelleyRUPD era) Source # initialRules ∷ [InitialRule (ShelleyRUPD era)] Source # transitionRules ∷ [TransitionRule (ShelleyRUPD era)] Source # assertions ∷ [Assertion (ShelleyRUPD era)] Source # renderAssertionViolation ∷ AssertionViolation (ShelleyRUPD era) → String Source # |