tezos-embedded-protocol-003-PsddFKi3 7.4

type block_param = {

protocol_data : P.block_header_data;
operations : P.operation list list;

}

val block : 
  ([ `POST ],
    (unit * [ `Main | `Test | `Hash of Tezos_crypto.Chain_id.t ])
    * [ `Genesis
      | `Head of int
      | `Alias of [ `Caboose | `Checkpoint | `Save_point ] * int
      | `Hash of Tezos_crypto.Block_hash.t * int
      | `Level of Int32.t ],
    (unit * [ `Main | `Test | `Hash of Tezos_crypto.Chain_id.t ])
    * [ `Genesis
      | `Head of int
      | `Alias of [ `Caboose | `Checkpoint | `Save_point ] * int
      | `Hash of Tezos_crypto.Block_hash.t * int
      | `Level of Int32.t ],
    < sort_operations : bool
    ; timestamp : Tezos_base.Time.Protocol.t option >,
    block_param,
    Tezos_base.Block_header.shell_header
    * Tezos_error_monad.Error_monad.error Tezos_base.Preapply_result.t list)
    Tezos_rpc.RPC_service.t

val operations : 
  ([ `POST ],
    (unit * [ `Main | `Test | `Hash of Tezos_crypto.Chain_id.t ])
    * [ `Genesis
      | `Head of int
      | `Alias of [ `Caboose | `Checkpoint | `Save_point ] * int
      | `Hash of Tezos_crypto.Block_hash.t * int
      | `Level of Int32.t ],
    (unit * [ `Main | `Test | `Hash of Tezos_crypto.Chain_id.t ])
    * [ `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.operation list,
    (P.operation_data * P.operation_receipt) list)
    Tezos_rpc.RPC_service.t