Tezos_raw_protocol_024_PsU87LFi.Baking
type ordered_slots = private {
delegate : Tezos_protocol_environment_024_PsU87LFi.Signature.public_key_hash;
consensus_key : Tezos_protocol_environment_024_PsU87LFi.Signature.public_key_hash;
companion_key : Tezos_protocol_environment_024_PsU87LFi.Bls.Public_key_hash.t
option;
rounds : Alpha_context.Round.t list;
attesting_power : int64;
attestation_slot : Alpha_context.Slot.t;
}
val attesting_rights :
Alpha_context.context ->
Alpha_context.Level.t ->
(Alpha_context.context
* ordered_slots
Tezos_protocol_environment_024_PsU87LFi.Signature.Public_key_hash.Map.t)
Tezos_protocol_environment_024_PsU87LFi.Error_monad.tzresult
Tezos_protocol_environment_024_PsU87LFi.Lwt.t
For a given level computes who has the right to include an attestation in the next block.
This function is only used by the 'validators' RPC.
val attesting_rights_by_first_slot :
Alpha_context.context ->
Alpha_context.Level.t ->
(Alpha_context.context
* Alpha_context.Consensus_key.power Alpha_context.Slot.Map.t)
Tezos_protocol_environment_024_PsU87LFi.Error_monad.tzresult
Tezos_protocol_environment_024_PsU87LFi.Lwt.t
Computes attesting rights for a given level.
val bonus_baking_reward :
Alpha_context.context ->
Alpha_context.Level.t ->
attesting_power:Alpha_context.Attesting_power.t ->
(Alpha_context.context * Alpha_context.Tez.t)
Tezos_protocol_environment_024_PsU87LFi.Error_monad.tzresult
Tezos_protocol_environment_024_PsU87LFi.Lwt.t
Computes the bonus baking reward depending on the attestation power.