tezos-protocol-006-PsCARTHA 20.1

type t = private

| Unaccounted
| Limited of {
1. remaining : Tezos_protocol_environment_006_PsCARTHA.Z.t;
}

val encoding : t Tezos_protocol_environment_006_PsCARTHA.Data_encoding.encoding

val pp : Tezos_protocol_environment_006_PsCARTHA.Format.formatter -> t -> unit

type cost

val cost_encoding : 
  cost Tezos_protocol_environment_006_PsCARTHA.Data_encoding.encoding

val pp_cost : 
  Tezos_protocol_environment_006_PsCARTHA.Format.formatter ->
  cost ->
  unit

type Tezos_protocol_environment_006_PsCARTHA.Error_monad.error +=

type Tezos_protocol_environment_006_PsCARTHA.Error_monad.error +=

type Tezos_protocol_environment_006_PsCARTHA.Error_monad.error +=

val free : cost

val atomic_step_cost : int -> cost

val step_cost : int -> cost

val alloc_cost : int -> cost

val alloc_bytes_cost : int -> cost

val alloc_mbytes_cost : int -> cost

val alloc_bits_cost : int -> cost

val read_bytes_cost : Tezos_protocol_environment_006_PsCARTHA.Z.t -> cost

val write_bytes_cost : Tezos_protocol_environment_006_PsCARTHA.Z.t -> cost

val (*@) : int -> cost -> cost

val (+@) : cost -> cost -> cost

val check_limit : 
  context ->
  Tezos_protocol_environment_006_PsCARTHA.Z.t ->
  unit Tezos_protocol_environment_006_PsCARTHA.Error_monad.tzresult

val set_limit : 
  context ->
  Tezos_protocol_environment_006_PsCARTHA.Z.t ->
  context

val set_unlimited : context -> context

val consume : 
  context ->
  cost ->
  context Tezos_protocol_environment_006_PsCARTHA.Error_monad.tzresult

val check_enough : 
  context ->
  cost ->
  unit Tezos_protocol_environment_006_PsCARTHA.Error_monad.tzresult

val level : context -> t

val consumed : 
  since:context ->
  until:context ->
  Tezos_protocol_environment_006_PsCARTHA.Z.t

val block_level : context -> Tezos_protocol_environment_006_PsCARTHA.Z.t

package tezos-protocol-006-PsCARTHA