type approximate_fee_bound = {
  1. fee : Tezos_protocol_alpha.Protocol.Alpha_context.Tez.t;
  2. counter : Z.t;
  3. gas_limit : Tezos_protocol_alpha.Protocol.Alpha_context.Gas.Arith.integral;
  4. storage_limit : Z.t;
}

Type to represent appoximate upper-bounds for the fee and limits, used to compute an upper bound on the size (in bytes) of an operation.

type injection_strategy = [
  1. | `Each_block
    (*

    Inject pending operations after each new L1 block

    *)
  2. | `Delay_block
    (*

    Wait for some time after the L1 block is produced to inject pending operations. This strategy allows for maximizing the number of the same kind of operations to include in a block.

    *)
]
module type TAG = sig ... end

Signature for tags used in injector

module type PARAMETERS = sig ... end

Module type for parameter of functor Injector_functor.Make.

module type S = sig ... end

Output signature for functor Injector_functor.Make.