S (octez-protocol-alpha-libs.Tezos_protocol_plugin

val path : 
  (Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context)
    Tezos_protocol_alpha.Environment.RPC_path.path

type other_contract_description = {

address : Tezos_protocol_alpha.Protocol.Contract_hash.t;
ty : Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr;

}

val other_contracts_encoding : 
  other_contract_description list
    Tezos_protocol_alpha.Environment.Data_encoding.encoding

type extra_big_map_description = {

id : Tezos_protocol_alpha.Protocol.Alpha_context.Big_map.Id.t;
kty : Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr;
vty : Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr;
items : Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr;

}

val extra_big_maps_encoding : 
  extra_big_map_description list
    Tezos_protocol_alpha.Environment.Data_encoding.encoding

val run_code_input_encoding : 
  ((Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Tez.t
    * Tezos_protocol_alpha.Protocol.Alpha_context.Tez.t option
    * Tezos_protocol_alpha.Environment.Chain_id.t
    * Tezos_protocol_alpha.Protocol.Alpha_context.Contract.t option
    * Tezos_protocol_environment_alpha.Signature.Public_key_hash.t option
    * Tezos_raw_protocol_alpha.Contract_hash.t option
    * Tezos_protocol_alpha.Protocol.Alpha_context.Entrypoint.t)
   * (Tezos_protocol_alpha.Protocol.Script_ir_unparser.unparsing_mode option
      * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.Arith.integral option
      * Tezos_protocol_alpha.Protocol.Script_timestamp.t option
      * Tezos_protocol_alpha.Protocol.Script_int.n
          Tezos_protocol_alpha.Protocol.Script_int.num
          option
      * other_contract_description list option
      * extra_big_map_description list option))
    Tezos_protocol_alpha.Environment.Data_encoding.encoding

val run_code_output_encoding : 
  (Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
   * Tezos_protocol_alpha.Protocol.Apply_internal_results.packed_internal_operation
       list
   * Tezos_protocol_alpha.Protocol.Alpha_context.Lazy_storage.diffs option)
    Tezos_protocol_alpha.Environment.Data_encoding.encoding

val trace_code_input_encoding : 
  ((Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Tez.t
    * Tezos_protocol_alpha.Protocol.Alpha_context.Tez.t option
    * Tezos_protocol_alpha.Environment.Chain_id.t
    * Tezos_protocol_alpha.Protocol.Alpha_context.Contract.t option
    * Tezos_protocol_environment_alpha.Signature.Public_key_hash.t option
    * Tezos_raw_protocol_alpha.Contract_hash.t option
    * Tezos_protocol_alpha.Protocol.Alpha_context.Entrypoint.t)
   * (Tezos_protocol_alpha.Protocol.Script_ir_unparser.unparsing_mode option
      * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.Arith.integral option
      * Tezos_protocol_alpha.Protocol.Script_timestamp.t option
      * Tezos_protocol_alpha.Protocol.Script_int.n
          Tezos_protocol_alpha.Protocol.Script_int.num
          option
      * other_contract_description list option
      * extra_big_map_description list option))
    Tezos_protocol_alpha.Environment.Data_encoding.encoding

val trace_encoding : 
  Tezos_protocol_alpha.Protocol.Script_typed_ir.execution_trace
    Tezos_protocol_alpha.Environment.Data_encoding.encoding

val trace_code_output_encoding : 
  (Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
   * Tezos_protocol_alpha.Protocol.Apply_internal_results.packed_internal_operation
       list
   * Tezos_protocol_alpha.Protocol.Script_typed_ir.execution_trace
   * Tezos_protocol_alpha.Protocol.Alpha_context.Lazy_storage.diffs option)
    Tezos_protocol_alpha.Environment.Data_encoding.encoding

val stack_encoding : 
  (Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
   * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr)
    list
    Tezos_protocol_alpha.Environment.Data_encoding.encoding

val run_instr_input_encoding : 
  (((Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
     * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr)
      list
    * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Environment.Chain_id.t
    * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.Arith.integral option
    * Tezos_protocol_alpha.Protocol.Script_timestamp.t option
    * Tezos_protocol_alpha.Protocol.Script_int.n
        Tezos_protocol_alpha.Protocol.Script_int.num
        option
    * Tezos_protocol_alpha.Protocol.Alpha_context.Contract.t option
    * Tezos_protocol_environment_alpha.Signature.Public_key_hash.t option
    * Tezos_raw_protocol_alpha.Contract_hash.t option
    * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr option)
   * (Tezos_protocol_alpha.Protocol.Alpha_context.Tez.t
      * Tezos_protocol_alpha.Protocol.Alpha_context.Tez.t option
      * other_contract_description list option
      * extra_big_map_description list option
      * Tezos_protocol_alpha.Protocol.Script_ir_unparser.unparsing_mode option
      * bool))
    Tezos_protocol_alpha.Environment.Data_encoding.encoding

val run_instr_output_encoding : 
  ((Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr)
     list
   * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.t)
    Tezos_protocol_alpha.Environment.Data_encoding.encoding

val run_tzip4_view_encoding : 
  ((Tezos_raw_protocol_alpha.Contract_hash.t
    * Tezos_protocol_alpha.Protocol.Alpha_context.Entrypoint.t
    * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Environment.Chain_id.t
    * Tezos_protocol_alpha.Protocol.Alpha_context.Contract.t option
    * Tezos_protocol_environment_alpha.Signature.Public_key_hash.t option
    * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.Arith.integral option
    * Tezos_protocol_alpha.Protocol.Script_ir_unparser.unparsing_mode
    * Tezos_protocol_alpha.Protocol.Script_timestamp.t option
    * Tezos_protocol_alpha.Protocol.Script_int.n
        Tezos_protocol_alpha.Protocol.Script_int.num
        option)
   * (other_contract_description list option
      * extra_big_map_description list option))
    Tezos_protocol_alpha.Environment.Data_encoding.encoding

val run_script_view_encoding : 
  ((Tezos_raw_protocol_alpha.Contract_hash.t
    * string
    * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * bool
    * Tezos_protocol_alpha.Environment.Chain_id.t
    * Tezos_protocol_alpha.Protocol.Alpha_context.Contract.t option
    * Tezos_protocol_environment_alpha.Signature.Public_key_hash.t option
    * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.Arith.integral option
    * Tezos_protocol_alpha.Protocol.Script_ir_unparser.unparsing_mode
    * Tezos_protocol_alpha.Protocol.Script_timestamp.t option)
   * (Tezos_protocol_alpha.Protocol.Script_int.n
        Tezos_protocol_alpha.Protocol.Script_int.num
        option
      * other_contract_description list option
      * extra_big_map_description list option))
    Tezos_protocol_alpha.Environment.Data_encoding.encoding

val normalize_stack_input_encoding : 
  ((Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr)
     list
   * Tezos_protocol_alpha.Protocol.Script_ir_unparser.unparsing_mode
   * bool
   * other_contract_description list option
   * extra_big_map_description list option)
    Tezos_protocol_alpha.Environment.Data_encoding.encoding

val normalize_stack_output_encoding : 
  (Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
   * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr)
    list
    Tezos_protocol_alpha.Environment.Data_encoding.encoding

val run_code : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    unit,
    (Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
     * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
     * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
     * Tezos_protocol_alpha.Protocol.Alpha_context.Tez.t
     * Tezos_protocol_alpha.Protocol.Alpha_context.Tez.t option
     * Tezos_protocol_alpha.Environment.Chain_id.t
     * Tezos_protocol_alpha.Protocol.Alpha_context.Contract.t option
     * Tezos_protocol_environment_alpha.Signature.Public_key_hash.t option
     * Tezos_raw_protocol_alpha.Contract_hash.t option
     * Tezos_protocol_alpha.Protocol.Alpha_context.Entrypoint.t)
    * (Tezos_protocol_alpha.Protocol.Script_ir_unparser.unparsing_mode option
       * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.Arith.integral option
       * Tezos_protocol_alpha.Protocol.Script_timestamp.t option
       * Tezos_protocol_alpha.Protocol.Script_int.n
           Tezos_protocol_alpha.Protocol.Script_int.num
           option
       * other_contract_description list option
       * extra_big_map_description list option),
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Apply_internal_results.packed_internal_operation
        list
    * Tezos_protocol_alpha.Protocol.Alpha_context.Lazy_storage.diffs option)
    Tezos_protocol_alpha.Environment.RPC_service.service

val trace_code : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    unit,
    (Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
     * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
     * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
     * Tezos_protocol_alpha.Protocol.Alpha_context.Tez.t
     * Tezos_protocol_alpha.Protocol.Alpha_context.Tez.t option
     * Tezos_protocol_alpha.Environment.Chain_id.t
     * Tezos_protocol_alpha.Protocol.Alpha_context.Contract.t option
     * Tezos_protocol_environment_alpha.Signature.Public_key_hash.t option
     * Tezos_raw_protocol_alpha.Contract_hash.t option
     * Tezos_protocol_alpha.Protocol.Alpha_context.Entrypoint.t)
    * (Tezos_protocol_alpha.Protocol.Script_ir_unparser.unparsing_mode option
       * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.Arith.integral option
       * Tezos_protocol_alpha.Protocol.Script_timestamp.t option
       * Tezos_protocol_alpha.Protocol.Script_int.n
           Tezos_protocol_alpha.Protocol.Script_int.num
           option
       * other_contract_description list option
       * extra_big_map_description list option),
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Apply_internal_results.packed_internal_operation
        list
    * Tezos_protocol_alpha.Protocol.Script_typed_ir.execution_trace
    * Tezos_protocol_alpha.Protocol.Alpha_context.Lazy_storage.diffs option)
    Tezos_protocol_alpha.Environment.RPC_service.service

val run_tzip4_view : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    unit,
    (Tezos_raw_protocol_alpha.Contract_hash.t
     * Tezos_protocol_alpha.Protocol.Alpha_context.Entrypoint.t
     * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
     * Tezos_protocol_alpha.Environment.Chain_id.t
     * Tezos_protocol_alpha.Protocol.Alpha_context.Contract.t option
     * Tezos_protocol_environment_alpha.Signature.Public_key_hash.t option
     * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.Arith.integral option
     * Tezos_protocol_alpha.Protocol.Script_ir_unparser.unparsing_mode
     * Tezos_protocol_alpha.Protocol.Script_timestamp.t option
     * Tezos_protocol_alpha.Protocol.Script_int.n
         Tezos_protocol_alpha.Protocol.Script_int.num
         option)
    * (other_contract_description list option
       * extra_big_map_description list option),
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr)
    Tezos_protocol_alpha.Environment.RPC_service.service

val run_script_view : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    unit,
    (Tezos_raw_protocol_alpha.Contract_hash.t
     * string
     * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
     * bool
     * Tezos_protocol_alpha.Environment.Chain_id.t
     * Tezos_protocol_alpha.Protocol.Alpha_context.Contract.t option
     * Tezos_protocol_environment_alpha.Signature.Public_key_hash.t option
     * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.Arith.integral option
     * Tezos_protocol_alpha.Protocol.Script_ir_unparser.unparsing_mode
     * Tezos_protocol_alpha.Protocol.Script_timestamp.t option)
    * (Tezos_protocol_alpha.Protocol.Script_int.n
         Tezos_protocol_alpha.Protocol.Script_int.num
         option
       * other_contract_description list option
       * extra_big_map_description list option),
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr)
    Tezos_protocol_alpha.Environment.RPC_service.service

val run_instr : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    unit,
    ((Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
      * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr)
       list
     * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
     * Tezos_protocol_alpha.Environment.Chain_id.t
     * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.Arith.integral option
     * Tezos_protocol_alpha.Protocol.Script_timestamp.t option
     * Tezos_protocol_alpha.Protocol.Script_int.n
         Tezos_protocol_alpha.Protocol.Script_int.num
         option
     * Tezos_protocol_alpha.Protocol.Alpha_context.Contract.t option
     * Tezos_protocol_environment_alpha.Signature.Public_key_hash.t option
     * Tezos_raw_protocol_alpha.Contract_hash.t option
     * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr option)
    * (Tezos_protocol_alpha.Protocol.Alpha_context.Tez.t
       * Tezos_protocol_alpha.Protocol.Alpha_context.Tez.t option
       * other_contract_description list option
       * extra_big_map_description list option
       * Tezos_protocol_alpha.Protocol.Script_ir_unparser.unparsing_mode option
       * bool),
    (Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
     * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr)
      list
    * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.t)
    Tezos_protocol_alpha.Environment.RPC_service.service

val typecheck_code : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    unit,
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.Arith.integral option
    * bool
    * bool,
    (Tezos_raw_protocol_alpha.Alpha_context.Script.location
     * (Tezos_raw_protocol_alpha.Alpha_context.Script.expr list
        * Tezos_raw_protocol_alpha.Alpha_context.Script.expr list))
      list
    * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.t)
    Tezos_protocol_alpha.Environment.RPC_service.service

val script_size : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    unit,
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.Arith.integral option
    * bool,
    int)
    Tezos_protocol_alpha.Environment.RPC_service.service

val typecheck_data : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    unit,
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.Arith.integral option
    * bool,
    Tezos_protocol_alpha.Protocol.Alpha_context.Gas.t)
    Tezos_protocol_alpha.Environment.RPC_service.service

val pack_data : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    unit,
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.Arith.integral option,
    Tezos_protocol_environment_alpha.Bytes.t
    * Tezos_protocol_alpha.Protocol.Alpha_context.Gas.t)
    Tezos_protocol_alpha.Environment.RPC_service.service

val normalize_data : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    unit,
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Script_ir_unparser.unparsing_mode
    * bool
    * other_contract_description list option
    * extra_big_map_description list option,
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr)
    Tezos_protocol_alpha.Environment.RPC_service.service

val normalize_stack : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    unit,
    (Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
     * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr)
      list
    * Tezos_protocol_alpha.Protocol.Script_ir_unparser.unparsing_mode
    * bool
    * other_contract_description list option
    * extra_big_map_description list option,
    (Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
     * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr)
      list)
    Tezos_protocol_alpha.Environment.RPC_service.service

val normalize_script : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    unit,
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Script_ir_unparser.unparsing_mode,
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr)
    Tezos_protocol_alpha.Environment.RPC_service.service

val normalize_type : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    unit,
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr,
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr)
    Tezos_protocol_alpha.Environment.RPC_service.service

val run_operation_query : 
  < version : version option > Tezos_protocol_alpha.Environment.RPC_query.t

val run_operation_output_encoding : 
  (Tezos_raw_protocol_alpha.Alpha_context.Operation.packed_protocol_data
   * Tezos_protocol_alpha.Protocol.Apply_results.packed_operation_metadata)
    Tezos_protocol_environment_alpha.Data_encoding.t

val run_operation : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    < version : version option >,
    Tezos_protocol_alpha.Protocol.Alpha_context.Operation.packed
    * Tezos_protocol_alpha.Environment.Chain_id.t,
    Tezos_raw_protocol_alpha.Alpha_context.Operation.packed_protocol_data
    * Tezos_protocol_alpha.Protocol.Apply_results.packed_operation_metadata)
    Tezos_protocol_alpha.Environment.RPC_service.service

val simulate_query : 
  < successor_level : bool
    ; version : version option >
    Tezos_protocol_alpha.Environment.RPC_query.t

val simulate_operation : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    < successor_level : bool
    ; version : version option >,
    int32 option
    * Tezos_protocol_alpha.Protocol.Alpha_context.Operation.packed
    * Tezos_protocol_alpha.Environment.Chain_id.t
    * int,
    Tezos_raw_protocol_alpha.Alpha_context.Operation.packed_protocol_data
    * Tezos_protocol_alpha.Protocol.Apply_results.packed_operation_metadata)
    Tezos_protocol_alpha.Environment.RPC_service.service

val entrypoint_type : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    unit,
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr
    * Tezos_protocol_alpha.Protocol.Alpha_context.Entrypoint.t,
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr)
    Tezos_protocol_alpha.Environment.RPC_service.service

val list_entrypoints : 
  ([ `POST ],
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    Tezos_protocol_alpha.Environment.Updater.rpc_context,
    unit,
    Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr,
    Tezos_protocol_alpha.Protocol.Michelson_v1_primitives.prim list list
    * (string * Tezos_protocol_alpha.Protocol.Alpha_context.Script.expr) list)
    Tezos_protocol_alpha.Environment.RPC_service.service