tezos-protocol-alpha 9.7 · OCaml Package

tezos-protocol-alpha

val list : 
  'a Tezos_protocol_environment_alpha__Environment.RPC_context.simple ->
  'a ->
  ?active:bool ->
  ?inactive:bool ->
  unit ->
  (Tezos_crypto.Signature.public_key_hash list,
    Tezos_error_monad.TzCore.error Tezos_error_monad.Error_monad.TzTrace.trace)
    Stdlib.result
    Lwt.t

type info = {

balance : Alpha_context.Tez.t;
frozen_balance : Alpha_context.Tez.t;
frozen_balance_by_cycle : Alpha_context.Delegate.frozen_balance Alpha_context.Cycle.Map.t;
staking_balance : Alpha_context.Tez.t;
delegated_contracts : Alpha_context.Contract.t list;
delegated_balance : Alpha_context.Tez.t;
deactivated : bool;
grace_period : Alpha_context.Cycle.t;
voting_power : int32;

}

val info_encoding : info Data_encoding.t

val info : 
  'a Tezos_protocol_environment_alpha__Environment.RPC_context.simple ->
  'a ->
  Tezos_crypto.Signature.public_key_hash ->
  (info,
    Tezos_error_monad.TzCore.error Tezos_error_monad.Error_monad.TzTrace.trace)
    Stdlib.result
    Lwt.t

val balance : 
  'a Tezos_protocol_environment_alpha__Environment.RPC_context.simple ->
  'a ->
  Tezos_crypto.Signature.public_key_hash ->
  (Alpha_context.Tez.t,
    Tezos_error_monad.TzCore.error Tezos_error_monad.Error_monad.TzTrace.trace)
    Stdlib.result
    Lwt.t

val frozen_balance : 
  'a Tezos_protocol_environment_alpha__Environment.RPC_context.simple ->
  'a ->
  Tezos_crypto.Signature.public_key_hash ->
  (Alpha_context.Tez.t,
    Tezos_error_monad.TzCore.error Tezos_error_monad.Error_monad.TzTrace.trace)
    Stdlib.result
    Lwt.t

val frozen_balance_by_cycle : 
  'a Tezos_protocol_environment_alpha__Environment.RPC_context.simple ->
  'a ->
  Tezos_crypto.Signature.public_key_hash ->
  (Alpha_context.Delegate.frozen_balance Alpha_context.Cycle.Map.t,
    Tezos_error_monad.TzCore.error Tezos_error_monad.Error_monad.TzTrace.trace)
    Stdlib.result
    Lwt.t

val staking_balance : 
  'a Tezos_protocol_environment_alpha__Environment.RPC_context.simple ->
  'a ->
  Tezos_crypto.Signature.public_key_hash ->
  (Alpha_context.Tez.t,
    Tezos_error_monad.TzCore.error Tezos_error_monad.Error_monad.TzTrace.trace)
    Stdlib.result
    Lwt.t

val delegated_contracts : 
  'a Tezos_protocol_environment_alpha__Environment.RPC_context.simple ->
  'a ->
  Tezos_crypto.Signature.public_key_hash ->
  (Alpha_context.Contract.t list,
    Tezos_error_monad.TzCore.error Tezos_error_monad.Error_monad.TzTrace.trace)
    Stdlib.result
    Lwt.t

val delegated_balance : 
  'a Tezos_protocol_environment_alpha__Environment.RPC_context.simple ->
  'a ->
  Tezos_crypto.Signature.public_key_hash ->
  (Alpha_context.Tez.t,
    Tezos_error_monad.TzCore.error Tezos_error_monad.Error_monad.TzTrace.trace)
    Stdlib.result
    Lwt.t

val deactivated : 
  'a Tezos_protocol_environment_alpha__Environment.RPC_context.simple ->
  'a ->
  Tezos_crypto.Signature.public_key_hash ->
  (bool,
    Tezos_error_monad.TzCore.error Tezos_error_monad.Error_monad.TzTrace.trace)
    Stdlib.result
    Lwt.t

val grace_period : 
  'a Tezos_protocol_environment_alpha__Environment.RPC_context.simple ->
  'a ->
  Tezos_crypto.Signature.public_key_hash ->
  (Alpha_context.Cycle.t,
    Tezos_error_monad.TzCore.error Tezos_error_monad.Error_monad.TzTrace.trace)
    Stdlib.result
    Lwt.t

val voting_power : 
  'a Tezos_protocol_environment_alpha__Environment.RPC_context.simple ->
  'a ->
  Alpha_context.public_key_hash ->
  (int32,
    Tezos_error_monad.TzCore.error Tezos_error_monad.Error_monad.TzTrace.trace)
    Stdlib.result
    Lwt.t

module Baking_rights : sig ... end

module Endorsing_rights : sig ... end

module Endorsing_power : sig ... end

module Required_endorsements : sig ... end

module Minimal_valid_time : sig ... end

val endorsement_rights : 
  Alpha_context.t ->
  Alpha_context.Level.t ->
  (Alpha_context.public_key_hash list,
    Tezos_protocol_environment_alpha__Environment.Error_monad.error
      Tezos_protocol_environment_alpha__Environment.Error_monad.trace)
    Stdlib.result
    Lwt.t

val baking_rights : 
  Alpha_context.t ->
  int option ->
  (Alpha_context.Raw_level.t
   * (Alpha_context.public_key_hash * Tezos_base.Time.Protocol.t option) list,
    Tezos_protocol_environment_alpha__Environment.Error_monad.error
      Tezos_protocol_environment_alpha__Environment.Error_monad.trace)
    Stdlib.result
    Lwt.t

val endorsing_power : 
  Alpha_context.t ->
  (Alpha_context.packed_operation * Tezos_crypto.Chain_id.t) ->
  (int,
    Tezos_protocol_environment_alpha__Environment.Error_monad.error
      Tezos_protocol_environment_alpha__Environment.Error_monad.trace)
    Stdlib.result
    Lwt.t

val required_endorsements : Alpha_context.t -> Alpha_context.Period.t -> int

val minimal_valid_time : 
  Alpha_context.t ->
  int ->
  int ->
  (Tezos_base.Time.Protocol.t,
    Tezos_protocol_environment_alpha__Environment.Error_monad.error
      Tezos_protocol_environment_alpha__Environment.Error_monad.trace)
    Stdlib.result

val register : unit -> unit

package tezos-protocol-alpha