Context (mavkit-protocol-alpha-libs.Mavryk_client_alpha.Mockup.M.Block

val read : 
  Mavryk_rpc.Context.simple ->
  ?chain:[ `Main | `Test | `Hash of Mavryk_base.TzPervasives.Chain_id.t ] ->
  ?block:
    [ `Genesis
    | `Head of int
    | `Alias of [ `Caboose | `Checkpoint | `Savepoint ] * int
    | `Hash of Mavryk_base.TzPervasives.Block_hash.t * int
    | `Level of Stdlib.Int32.t ] ->
  ?depth:int ->
  string list ->
  Mavryk_context_sigs.Context.Proof_types.raw_context
    Mavryk_base.TzPervasives.tzresult
    Lwt.t

val merkle_tree : 
  Mavryk_rpc.Context.simple ->
  ?chain:[ `Main | `Test | `Hash of Mavryk_base.TzPervasives.Chain_id.t ] ->
  ?block:
    [ `Genesis
    | `Head of int
    | `Alias of [ `Caboose | `Checkpoint | `Savepoint ] * int
    | `Hash of Mavryk_base.TzPervasives.Block_hash.t * int
    | `Level of Stdlib.Int32.t ] ->
  ?holey:bool ->
  string list ->
  Mavryk_context_sigs.Context.Proof_types.tree
    Mavryk_context_sigs.Context.Proof_types.t
    option
    Mavryk_base.TzPervasives.tzresult
    Lwt.t