"""

    Transforms the state from the previous hard fork (`old`) into the block

    chain object for this hard fork and returns it.

    When forks need to implement an irregular state transition, this function

    is used to handle the irregularity. See the :ref:`DAO Fork <dao-fork>` for

    an example.

    Parameters

    ----------

    old :

        Previous block chain object.

    Returns

    -------

    new : `BlockChain`

        Upgraded block chain object for this hard fork.

    """

    return old

    """

    Obtain the list of hashes of the previous 256 blocks in order of

    increasing block number.

    This function will return less hashes for the first 256 blocks.

    The ``BLOCKHASH`` opcode needs to access the latest hashes on the chain,

    therefore this function retrieves them.

    Parameters

    ----------

    chain :

        History and current state.

    Returns

    -------

    recent_block_hashes : `List[Hash32]`

        Hashes of the recent 256 blocks in order of increasing block number.

    """

    recent_blocks = chain.blocks[-255:]

    # TODO: This function has not been tested rigorously

    if len(recent_blocks) == 0:

        return []

    recent_block_hashes = []

    for block in recent_blocks:

        prev_block_hash = block.header.parent_hash

        recent_block_hashes.append(prev_block_hash)

    # We are computing the hash only for the most recent block and not for

    # the rest of the blocks as they have successors which have the hash of

    # the current block as parent hash.

    most_recent_block_hash = keccak256(rlp.encode(recent_blocks[-1].header))

    recent_block_hashes.append(most_recent_block_hash)

    return recent_block_hashes

    """

    Attempts to apply a block to an existing block chain.

    All parts of the block's contents need to be verified before being added

    to the chain. Blocks are verified by ensuring that the contents of the

    block make logical sense with the contents of the parent block. The

    information in the block's header must also match the corresponding

    information in the block.

    To implement Ethereum, in theory clients are only required to store the

    most recent 255 blocks of the chain since as far as execution is

    concerned, only those blocks are accessed. Practically, however, clients

    should store more blocks to handle reorgs.

    Parameters

    ----------

    chain :

        History and current state.

    block :

        Block to apply to `chain`.

    """

    chain_context = ChainContext(

        chain_id=chain.chain_id,

        block_hashes=get_last_256_block_hashes(chain),

        parent_header=chain.blocks[-1].header,

    )

    block_diff = execute_block(block, chain.state, chain_context)

    apply_changes_to_state(chain.state, block_diff)

    chain.blocks.append(block)

    if len(chain.blocks) > 255:

        # Real clients have to store more blocks to deal with reorgs, but the

        # protocol only requires the last 255

        chain.blocks = chain.blocks[-255:]

    """

    Execute a block and validate the resulting roots against the header.

    This method is idempotent.

    Parameters

    ----------

    block :

        Block to validate and execute.

    pre_state :

        Pre-execution state provider.

    chain_context :

        Chain context that the block may need during execution.

    Returns

    -------

    block_diff : `BlockDiff`

        Account, storage, and code changes produced by block execution.

    """

    if len(rlp.encode(block)) > MAX_RLP_BLOCK_SIZE:

        raise InvalidBlock("Block rlp size exceeds MAX_RLP_BLOCK_SIZE")

    parent_header = chain_context.parent_header

    validate_header(parent_header, block.header)

    if block.ommers != ():

        raise InvalidBlock

    block_state = BlockState(pre_state=pre_state)

    block_env = vm.BlockEnvironment(

        chain_id=chain_context.chain_id,

        state=block_state,

        block_gas_limit=block.header.gas_limit,

        block_hashes=chain_context.block_hashes,

        coinbase=block.header.coinbase,

        number=block.header.number,

        base_fee_per_gas=block.header.base_fee_per_gas,

        time=block.header.timestamp,

        prev_randao=block.header.prev_randao,

        excess_blob_gas=block.header.excess_blob_gas,

        parent_beacon_block_root=block.header.parent_beacon_block_root,

        block_access_list_builder=BlockAccessListBuilder(),

        slot_number=block.header.slot_number,

    )

    block_output = apply_body(

        block_env=block_env,

        transactions=block.transactions,

        withdrawals=block.withdrawals,

    )

    block_diff = extract_block_diff(block_state)

    block_state_root, _ = pre_state.compute_state_root_and_trie_changes(

        block_diff.account_changes, block_diff.storage_changes

    )

    transactions_root = root(block_output.transactions_trie)

    receipt_root = root(block_output.receipts_trie)

    block_logs_bloom = logs_bloom(block_output.block_logs)

    withdrawals_root = root(block_output.withdrawals_trie)

    requests_hash = compute_requests_hash(block_output.requests)

    computed_block_access_list_hash = hash_block_access_list(

        block_output.block_access_list

    )

    block_gas_used = max(

        block_output.block_gas_used,

        block_output.block_state_gas_used,

    )

    if block_gas_used != block.header.gas_used:

        raise InvalidBlock(f"{block_gas_used} != {block.header.gas_used}")

    if transactions_root != block.header.transactions_root:

        raise InvalidBlock

    if block_state_root != block.header.state_root:

        raise InvalidBlock

    if receipt_root != block.header.receipt_root:

        raise InvalidBlock

    if block_logs_bloom != block.header.bloom:

        raise InvalidBlock

    if withdrawals_root != block.header.withdrawals_root:

        raise InvalidBlock

    if block_output.blob_gas_used != block.header.blob_gas_used:

        raise InvalidBlock

    if requests_hash != block.header.requests_hash:

        raise InvalidBlock

    if computed_block_access_list_hash != block.header.block_access_list_hash:

        raise InvalidBlock("Invalid block access list hash")

    return block_diff

    """

    Calculates the base fee per gas for the block.

    Parameters

    ----------

    block_gas_limit :

        Gas limit of the block for which the base fee is being calculated.

    parent_gas_limit :

        Gas limit of the parent block.

    parent_gas_used :

        Gas used in the parent block.

    parent_base_fee_per_gas :

        Base fee per gas of the parent block.

    Returns

    -------

    base_fee_per_gas : `Uint`

        Base fee per gas for the block.

    """

    parent_gas_target = parent_gas_limit // ELASTICITY_MULTIPLIER

    if not check_gas_limit(block_gas_limit, parent_gas_limit):

        raise InvalidBlock

    if parent_gas_used == parent_gas_target:

        expected_base_fee_per_gas = parent_base_fee_per_gas

    elif parent_gas_used > parent_gas_target:

        gas_used_delta = parent_gas_used - parent_gas_target

        parent_fee_gas_delta = parent_base_fee_per_gas * gas_used_delta

        target_fee_gas_delta = parent_fee_gas_delta // parent_gas_target

        base_fee_per_gas_delta = max(

            target_fee_gas_delta // BASE_FEE_MAX_CHANGE_DENOMINATOR,

            Uint(1),

        )

        expected_base_fee_per_gas = (

            parent_base_fee_per_gas + base_fee_per_gas_delta

        )

    else:

        gas_used_delta = parent_gas_target - parent_gas_used

        parent_fee_gas_delta = parent_base_fee_per_gas * gas_used_delta

        target_fee_gas_delta = parent_fee_gas_delta // parent_gas_target

        base_fee_per_gas_delta = (

            target_fee_gas_delta // BASE_FEE_MAX_CHANGE_DENOMINATOR

        )

        expected_base_fee_per_gas = (

            parent_base_fee_per_gas - base_fee_per_gas_delta

        )

    return Uint(expected_base_fee_per_gas)

    """

    Verify a block header against its parent.

    In order to consider a block's header valid, the logic for the

    quantities in the header should match the logic for the block itself.

    For example the header timestamp should be greater than the block's parent

    timestamp because the block was created *after* the parent block.

    Additionally, the block's number should be directly following the parent

    block's number since it is the next block in the sequence.

    Parameters

    ----------

    parent_header :

        Header of the parent block.

    header :

        Header to check for correctness.

    """

    if header.number < Uint(1):

        raise InvalidBlock

    excess_blob_gas = calculate_excess_blob_gas(parent_header)

    if header.excess_blob_gas != excess_blob_gas:

        raise InvalidBlock

    if header.gas_used > header.gas_limit:

        raise InvalidBlock

    expected_base_fee_per_gas = calculate_base_fee_per_gas(

        header.gas_limit,

        parent_header.gas_limit,

        parent_header.gas_used,

        parent_header.base_fee_per_gas,

    )

    if expected_base_fee_per_gas != header.base_fee_per_gas:

        raise InvalidBlock

    if header.timestamp <= parent_header.timestamp:

        raise InvalidBlock

    if header.number != parent_header.number + Uint(1):

        raise InvalidBlock

    if len(header.extra_data) > 32:

        raise InvalidBlock

    if header.difficulty != 0:

        raise InvalidBlock

    if header.nonce != b"\x00\x00\x00\x00\x00\x00\x00\x00":

        raise InvalidBlock

    if header.ommers_hash != EMPTY_OMMER_HASH:

        raise InvalidBlock

    block_parent_hash = keccak256(rlp.encode(parent_header))

    if header.parent_hash != block_parent_hash:

        raise InvalidBlock

    """

    Check if the transaction is includable in the block.

    Parameters

    ----------

    block_env :

        The block scoped environment.

    block_output :

        The block output for the current block.

    tx :

        The transaction.

    tx_state :

        The transaction state tracker.

    intrinsic :

        The transaction's intrinsic gas cost, split into regular and

        state components.

    Returns

    -------

    sender_address :

        The sender of the transaction.

    effective_gas_price :

        The price to charge for gas when the transaction is executed.

    blob_versioned_hashes :

        The blob versioned hashes of the transaction.

    tx_blob_gas_used:

        The blob gas used by the transaction.

    Raises

    ------

    InvalidBlock :

        If the transaction is not includable.

    GasUsedExceedsLimitError :

        If the gas used by the transaction exceeds the block's gas limit.

    NonceMismatchError :

        If the nonce of the transaction is not equal to the sender's nonce.

    InsufficientBalanceError :

        If the sender's balance is not enough to pay for the transaction.

    InvalidSenderError :

        If the transaction is from an address that does not exist anymore.

    PriorityFeeGreaterThanMaxFeeError :

        If the priority fee is greater than the maximum fee per gas.

    InsufficientMaxFeePerGasError :

        If the maximum fee per gas is insufficient for the transaction.

    InsufficientMaxFeePerBlobGasError :

        If the maximum fee per blob gas is insufficient for the transaction.

    BlobGasLimitExceededError :

        If the blob gas used by the transaction exceeds the block's blob gas

        limit.

    InvalidBlobVersionedHashError :

        If the transaction contains a blob versioned hash with an invalid

        version.

    NoBlobDataError :

        If the transaction is a type 3 but has no blobs.

    BlobCountExceededError :

        If the transaction is a type 3 and has more blobs than the limit.

    TransactionTypeContractCreationError:

        If the transaction type is not allowed to create contracts.

    EmptyAuthorizationListError :

        If the transaction is a SetCodeTransaction and the authorization list

        is empty.

    """

    # Per-tx 2D gas inclusion check: for each dimension the worst-case

    # contribution must fit in the remaining budget.  Block-end

    # validation still enforces

    # max(block_regular_gas_used, block_state_gas_used) <= gas_limit.

    regular_gas_available = (

        block_env.block_gas_limit - block_output.block_gas_used

    )

    state_gas_available = (

        block_env.block_gas_limit - block_output.block_state_gas_used

    )

    blob_gas_available = MAX_BLOB_GAS_PER_BLOCK - block_output.blob_gas_used

    # Worst-case regular contribution: tx.gas minus the portion that

    # must go to intrinsic state gas, capped at TX_MAX_GAS_LIMIT.

    if min(TX_MAX_GAS_LIMIT, tx.gas - intrinsic.state) > (

        regular_gas_available

    ):

        raise GasUsedExceedsLimitError("gas used exceeds limit")

    # Worst-case state contribution: tx.gas minus the portion that

    # must go to intrinsic regular gas.

    if tx.gas - intrinsic.regular > state_gas_available:

        raise GasUsedExceedsLimitError("gas used exceeds limit")

    tx_blob_gas_used = calculate_total_blob_gas(tx)

    if tx_blob_gas_used > blob_gas_available:

        raise BlobGasLimitExceededError("blob gas limit exceeded")

    sender_address = recover_sender(block_env.chain_id, tx)

    sender_account = get_account(tx_state, sender_address)

    if isinstance(

        tx, (FeeMarketTransaction, BlobTransaction, SetCodeTransaction)

    ):

        if tx.max_fee_per_gas < tx.max_priority_fee_per_gas:

            raise PriorityFeeGreaterThanMaxFeeError(

                "priority fee greater than max fee"

            )

        if tx.max_fee_per_gas < block_env.base_fee_per_gas:

            raise InsufficientMaxFeePerGasError(

                tx.max_fee_per_gas, block_env.base_fee_per_gas

            )

        priority_fee_per_gas = min(

            tx.max_priority_fee_per_gas,

            tx.max_fee_per_gas - block_env.base_fee_per_gas,

        )

        effective_gas_price = priority_fee_per_gas + block_env.base_fee_per_gas

        max_gas_fee = tx.gas * tx.max_fee_per_gas

    else:

        if tx.gas_price < block_env.base_fee_per_gas:

            raise InvalidBlock

        effective_gas_price = tx.gas_price

        max_gas_fee = tx.gas * tx.gas_price

    if isinstance(tx, BlobTransaction):

        blob_count = len(tx.blob_versioned_hashes)

        if blob_count == 0:

            raise NoBlobDataError("no blob data in transaction")

        if blob_count > BLOB_COUNT_LIMIT:

            raise BlobCountExceededError(

                f"Tx has {blob_count} blobs. Max allowed: {BLOB_COUNT_LIMIT}"

            )

        for blob_versioned_hash in tx.blob_versioned_hashes:

            if blob_versioned_hash[0:1] != VERSIONED_HASH_VERSION_KZG:

                raise InvalidBlobVersionedHashError(

                    "invalid blob versioned hash"

                )

        blob_gas_price = calculate_blob_gas_price(block_env.excess_blob_gas)

        if Uint(tx.max_fee_per_blob_gas) < blob_gas_price:

            raise InsufficientMaxFeePerBlobGasError(

                "insufficient max fee per blob gas"

            )

        max_gas_fee += Uint(calculate_total_blob_gas(tx)) * Uint(

            tx.max_fee_per_blob_gas

        )

        blob_versioned_hashes = tx.blob_versioned_hashes

    else:

        blob_versioned_hashes = ()

    if isinstance(tx, (BlobTransaction, SetCodeTransaction)):

        if not isinstance(tx.to, Address):

            raise TransactionTypeContractCreationError(tx)

    if isinstance(tx, SetCodeTransaction):

        if not any(tx.authorizations):

            raise EmptyAuthorizationListError("empty authorization list")

    if sender_account.nonce > Uint(tx.nonce):

        raise NonceMismatchError("nonce too low")

    elif sender_account.nonce < Uint(tx.nonce):

        raise NonceMismatchError("nonce too high")

    if Uint(sender_account.balance) < max_gas_fee + Uint(tx.value):

        raise InsufficientBalanceError("insufficient sender balance")

    sender_code = get_code(tx_state, sender_account.code_hash)

    if sender_account.code_hash != EMPTY_CODE_HASH and not is_valid_delegation(

        sender_code

    ):

        raise InvalidSenderError("not EOA")

    return (

        sender_address,

        effective_gas_price,

        blob_versioned_hashes,

        tx_blob_gas_used,

    )

    """

    Make the receipt for a transaction that was executed.

    Parameters

    ----------

    tx :

        The executed transaction.

    error :

        Error in the top level frame of the transaction, if any.

    cumulative_gas_used :

        The total gas used so far in the block after the transaction was

        executed. This is the gas used after refunds.

    logs :

        The logs produced by the transaction.

    Returns

    -------

    receipt :

        The receipt for the transaction.

    """

    receipt = Receipt(

        succeeded=error is None,

        cumulative_gas_used=cumulative_gas_used,

        bloom=logs_bloom(logs),

        logs=logs,

    )

    return encode_receipt(tx, receipt)

    """

    Process a system transaction and raise an error if the contract does not

    contain code or if the transaction fails.

    Parameters

    ----------

    block_env :

        The block scoped environment.

    target_address :

        Address of the contract to call.

    data :

        Data to pass to the contract.

    Returns

    -------

    system_tx_output : `MessageCallOutput`

        Output of processing the system transaction.

    """

    # Read through BlockState (not pre-state) so that a system contract

    # deployed by an earlier transaction in the same block is visible.

    # See EIP-7002 and EIP-7251 for this edge case.

    #

    # This read is not recorded in the state tracker.

    # However, this is fine because `process_unchecked_system_transaction`

    # does its own get_account on the TransactionState that we do incorporate

    # into BlockState.

    untracked_state = TransactionState(parent=block_env.state)

    system_contract_code = get_code(

        untracked_state,

        get_account(untracked_state, target_address).code_hash,

    )

    if len(system_contract_code) == 0:

        raise InvalidBlock(

            f"System contract address {target_address.hex()} does not "

            "contain code"

        )

    system_tx_output = process_unchecked_system_transaction(

        block_env,

        target_address,