Safe Haskell | None |
---|---|
Language | Haskell2010 |
Synopsis
- data NEWEPOCH era
-
data
NewEpochPredicateFailure
era
- = EpochFailure ( PredicateFailure ( EraRule "EPOCH" era))
- | CorruptRewardUpdate !( RewardUpdate ( Crypto era))
- | MirFailure ( PredicateFailure ( EraRule "MIR" era))
-
data
NewEpochEvent
era
- = DeltaRewardEvent ( Event ( EraRule "RUPD" era))
- | RestrainedRewards EpochNo ( Map ( Credential ' Staking ( Crypto era)) ( Set ( Reward ( Crypto era)))) ( Set ( Credential ' Staking ( Crypto era)))
- | TotalRewardEvent EpochNo ( Map ( Credential ' Staking ( Crypto era)) ( Set ( Reward ( Crypto era))))
- | EpochEvent ( Event ( EraRule "EPOCH" era))
- | MirEvent ( Event ( EraRule "MIR" era))
- | TotalAdaPotsEvent AdaPots
- type family PredicateFailure a
- calculatePoolDistr :: SnapShot crypto -> PoolDistr crypto
Documentation
Instances
data NewEpochPredicateFailure era Source #
EpochFailure ( PredicateFailure ( EraRule "EPOCH" era)) | |
CorruptRewardUpdate !( RewardUpdate ( Crypto era)) | |
MirFailure ( PredicateFailure ( EraRule "MIR" era)) |
Instances
data NewEpochEvent era Source #
DeltaRewardEvent ( Event ( EraRule "RUPD" era)) | |
RestrainedRewards EpochNo ( Map ( Credential ' Staking ( Crypto era)) ( Set ( Reward ( Crypto era)))) ( Set ( Credential ' Staking ( Crypto era))) | |
TotalRewardEvent EpochNo ( Map ( Credential ' Staking ( Crypto era)) ( Set ( Reward ( Crypto era)))) | |
EpochEvent ( Event ( EraRule "EPOCH" era)) | |
MirEvent ( Event ( EraRule "MIR" era)) | |
TotalAdaPotsEvent AdaPots |
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
calculatePoolDistr :: SnapShot crypto -> PoolDistr crypto Source #