tezos-embedded-protocol-003-PsddFKi3 7.4

val shell_header : 
  Tezos_rpc.RPC_context.simple ->
  ?chain:[ `Main | `Test | `Hash of Tezos_crypto.Chain_id.t ] ->
  ?block:
    [ `Genesis
    | `Head of int
    | `Alias of [ `Caboose | `Checkpoint | `Save_point ] * int
    | `Hash of Tezos_crypto.Block_hash.t * int
    | `Level of Int32.t ] ->
  unit ->
  (Tezos_base.Block_header.shell_header,
    Tezos_error_monad.Error_monad.error list)
    result
    Lwt.t

val protocol_data : 
  Tezos_rpc.RPC_context.simple ->
  ?chain:[ `Main | `Test | `Hash of Tezos_crypto.Chain_id.t ] ->
  ?block:
    [ `Genesis
    | `Head of int
    | `Alias of [ `Caboose | `Checkpoint | `Save_point ] * int
    | `Hash of Tezos_crypto.Block_hash.t * int
    | `Level of Int32.t ] ->
  unit ->
  (P.block_header_data, Tezos_error_monad.Error_monad.error list) result Lwt.t

val raw_protocol_data : 
  Tezos_rpc.RPC_context.simple ->
  ?chain:[ `Main | `Test | `Hash of Tezos_crypto.Chain_id.t ] ->
  ?block:
    [ `Genesis
    | `Head of int
    | `Alias of [ `Caboose | `Checkpoint | `Save_point ] * int
    | `Hash of Tezos_crypto.Block_hash.t * int
    | `Level of Int32.t ] ->
  unit ->
  (Bytes.t, Tezos_error_monad.Error_monad.error list) result Lwt.t