octez-protocol-019-PtParisB-libs 20.1

module Proto = Tezos_embedded_protocol_019_PtParisB.Registerer.Registered

type block_info =
  Tezos_client_019_PtParisB.Protocol_client_context.Alpha_block_services.block_info

val parametric_constants : 
  Tezos_shell_services.Shell_services.chain ->
  Tezos_shell_services.Shell_services.block ->
  Tezos_rpc.Context.generic ->
  Tezos_raw_protocol_019_PtParisB.Alpha_context.Constants.Parametric.t
    Tezos_protocol_environment_019_PtParisB.Error_monad.shell_tzresult
    Tezos_protocol_environment_019_PtParisB.Lwt.t

val get_constants : 
  Tezos_shell_services.Shell_services.chain ->
  Tezos_shell_services.Shell_services.block ->
  Tezos_rpc.Context.generic ->
  (Tezos_dal_node_lib.Dal_plugin.proto_parameters,
    Tezos_base.TzPervasives.Error_monad.tztrace)
    result
    Lwt.t

val block_info : 
  ?chain:[ `Main | `Test | `Hash of Tezos_base.TzPervasives.Chain_id.t ] ->
  ?block:
    [ `Genesis
    | `Head of int
    | `Alias of [ `Caboose | `Checkpoint | `Savepoint ] * int
    | `Hash of Tezos_base.TzPervasives.Block_hash.t * int
    | `Level of Int32.t ] ->
  metadata:[ `Always | `Never ] ->
  Tezos_rpc.Context.generic ->
  Tezos_client_019_PtParisB.Protocol_client_context.Alpha_block_services.block_info
    Tezos_base.TzPervasives.tzresult
    Lwt.t

val block_shell_header : block_info -> Tezos_base.Block_header.shell_header

val get_round : 
  Tezos_protocol_019_PtParisB.Protocol.Alpha_context.Fitness.raw ->
  (int32, Tezos_base.TzPervasives.tztrace) result

val status_of_result : 
  ('a, 'b, 'c)
    Tezos_protocol_019_PtParisB.Protocol.Apply_operation_result.operation_result ->
  Tezos_dal_node_lib.Dal_plugin.operation_application_result

val get_published_slot_headers : 
  block_info ->
  ((Tezos_dal_node_lib.Dal_plugin.slot_header
    * Tezos_dal_node_lib.Dal_plugin.operation_application_result)
     list,
    'a)
    result
    Lwt.t

val get_committee : 
  Tezos_rpc.Context.generic ->
  level:int32 ->
  (int list Tezos_base.TzPervasives.Signature.Public_key_hash.Map.t,
    Tezos_base.TzPervasives.tztrace)
    result
    Lwt.t

val attested_slot_headers : 
  block_info ->
  number_of_slots:int ->
  (int list,
    Tezos_base.TzPervasives.error Tezos_base.TzPervasives.TzTrace.trace)
    result

module Skip_list : sig ... end

module RPC : sig ... end

package octez-protocol-019-PtParisB-libs