Attestation_rights (mavkit-protocol-alpha-libs.Mavryk_protocol_plugin_alpha.RPC.Attestation

type delegate_rights = {

delegate : Mavryk_protocol_alpha.Environment.Signature.Public_key_hash.t;
consensus_key : Mavryk_protocol_alpha.Environment.Signature.Public_key_hash.t;
first_slot : Mavryk_protocol_alpha.Protocol.Alpha_context.Slot.t;
attestation_power : int;

}

type t = {

level : Mavryk_protocol_alpha.Protocol.Alpha_context.Raw_level.t;
delegates_rights : delegate_rights list;
estimated_time : Mavryk_protocol_alpha.Environment.Time.t option;

}

val delegate_rights_encoding : 
  delegate_rights Mavryk_protocol_alpha.Environment.Data_encoding.encoding

val encoding : t Mavryk_protocol_alpha.Environment.Data_encoding.encoding

module S : sig ... end

val attestation_rights_at_level : 
  Mavryk_raw_protocol_alpha.Alpha_context.context ->
  Mavryk_raw_protocol_alpha.Alpha_context.Level.t ->
  (Mavryk_raw_protocol_alpha.Alpha_context.context * t,
    Mavryk_protocol_environment_alpha.Error_monad.error
      Mavryk_protocol_environment_alpha.Error_monad.trace)
    Stdlib.result
    Lwt.t

val get_attestation_rights : 
  Mavryk_raw_protocol_alpha__Alpha_context.t ->
  S.attestation_rights_query ->
  (t list,
    Mavryk_protocol_environment_alpha.Error_monad.error
      Mavryk_protocol_environment_alpha.Error_monad.trace)
    Stdlib.result
    Lwt.t

val register : unit -> unit

val get : 
  'a Mavryk_protocol_alpha.Environment.RPC_context.simple ->
  ?levels:Mavryk_protocol_alpha.Protocol.Alpha_context.Raw_level.t list ->
  ?cycle:Mavryk_protocol_alpha.Protocol.Alpha_context.Cycle.t ->
  ?delegates:Mavryk_protocol_alpha.Environment.Signature.Public_key_hash.t list ->
  ?consensus_keys:
    Mavryk_protocol_alpha.Environment.Signature.Public_key_hash.t list ->
  'b ->
  t list Mavryk_protocol_environment_alpha.Error_monad.shell_tzresult
    Mavryk_protocol_environment_alpha.Lwt.t