Delegate (mavkit-protocol-alpha-libs.Mavryk_alpha_test

type info = Mavryk_protocol_plugin_alpha.Plugin.RPC.Delegates.info = {

full_balance : Mavryk_protocol_alpha.Protocol.Alpha_context.Tez.t;
current_frozen_deposits : Mavryk_protocol_alpha.Protocol.Alpha_context.Tez.t;
frozen_deposits : Mavryk_protocol_alpha.Protocol.Alpha_context.Tez.t;
staking_balance : Mavryk_protocol_alpha.Protocol.Alpha_context.Tez.t;
frozen_deposits_limit : Mavryk_protocol_alpha.Protocol.Alpha_context.Tez.t option;
delegated_contracts : Mavryk_protocol_alpha.Protocol.Alpha_context.Contract.t list;
delegated_balance : Mavryk_protocol_alpha.Protocol.Alpha_context.Tez.t;
min_delegated_in_current_cycle : Mavryk_protocol_alpha.Protocol.Alpha_context.Tez.t * Mavryk_protocol_alpha.Protocol.Level_repr.t option;
total_delegated_stake : Mavryk_protocol_alpha.Protocol.Alpha_context.Tez.t;
staking_denominator : Mavryk_protocol_alpha.Protocol.Alpha_context.Staking_pseudotoken.t;
deactivated : bool;
grace_period : Mavryk_protocol_alpha.Protocol.Alpha_context.Cycle.t;
pending_denunciations : bool;
voting_info : Vote.delegate_info;
active_consensus_key : Mavryk_protocol_alpha.Environment.Signature.Public_key_hash.t;
pending_consensus_keys : (Mavryk_protocol_alpha.Protocol.Alpha_context.Cycle.t * Mavryk_protocol_alpha.Environment.Signature.Public_key_hash.t) list;

}

type stake = {

frozen : Mavryk_protocol_alpha.Protocol.Alpha_context.Tez.t;
weighted_delegated : Mavryk_protocol_alpha.Protocol.Alpha_context.Tez.t;

}

val info : 
  t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
  Mavryk_protocol_plugin_alpha.Plugin.RPC.Delegates.info
    Mavryk_base.TzPervasives.tzresult
    Mavryk_protocol_alpha.Environment.Lwt.t

val full_balance : 
  t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.Tez.t
    Mavryk_base.TzPervasives.tzresult
    Mavryk_protocol_alpha.Environment.Lwt.t

val current_frozen_deposits : 
  t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.Tez.t
    Mavryk_base.TzPervasives.tzresult
    Mavryk_protocol_alpha.Environment.Lwt.t

val initial_frozen_deposits : 
  t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.Tez.t
    Mavryk_base.TzPervasives.tzresult
    Mavryk_protocol_alpha.Environment.Lwt.t

calls the RPC frozen_deposits: we're using a different name to be more easily distinguishable from current_frozen_deposits

val staking_balance : 
  t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.Tez.t
    Mavryk_base.TzPervasives.tzresult
    Mavryk_protocol_alpha.Environment.Lwt.t

val staking_denominator : 
  t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
  Mavryk_protocol_alpha.Environment.Z.t Mavryk_base.TzPervasives.tzresult
    Mavryk_protocol_alpha.Environment.Lwt.t

val frozen_deposits_limit : 
  t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.Tez.t option
    Mavryk_base.TzPervasives.tzresult
    Mavryk_protocol_alpha.Environment.Lwt.t

val deactivated : 
  t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
  bool Mavryk_base.TzPervasives.tzresult
    Mavryk_protocol_alpha.Environment.Lwt.t

val voting_info : 
  t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
  Vote.delegate_info Mavryk_base.TzPervasives.tzresult
    Mavryk_protocol_alpha.Environment.Lwt.t

val consensus_key : 
  t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
  Mavryk_protocol_alpha.Protocol.Delegate_services.consensus_keys_info
    Mavryk_base.TzPervasives.tzresult
    Mavryk_protocol_alpha.Environment.Lwt.t

val participation : 
  t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.Delegate.For_RPC.participation_info
    Mavryk_base.TzPervasives.tzresult
    Mavryk_protocol_alpha.Environment.Lwt.t

val is_forbidden : 
  ?policy:Block.baker_policy ->
  t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
  bool Mavryk_base.TzPervasives.tzresult
    Mavryk_protocol_alpha.Environment.Lwt.t

This function might begin constructing a block. Use policy to specify a valid baker for the new block (default By_round 0)

val stake_for_cycle : 
  ?policy:Block.baker_policy ->
  t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.Cycle.t ->
  Mavryk_protocol_alpha.Protocol.Alpha_context.public_key_hash ->
  stake Mavryk_base.TzPervasives.tzresult
    Mavryk_protocol_alpha.Environment.Lwt.t