| m < # avols[v], ebm-cons(avols0), ebm-cons(avols), v ∈ avols, avols ⊆ avols0 ⊦ ⟨ebm_erase#(v, m; avols; err)⟩ (avols ⊆ avols0) |
m < # avols[v], ebm-cons(avols), ebm-cons(avols0), v ∈ avols, avols ⊆ avols0 ⊦ ⟨if v ∈ avols ∧ m < # avols[v] then {fail_or_success#(; ; err); if err = ESUCCESS then avols[v][m] := erased else {skip or avols[v][m] := unmapped}} else abort⟩ (avols ⊆ avols0)
Used simplifier rules: erase: ⊦ ;