| # apebs = # wlar, vols[v][vtblpnum2] = ⌜n⌝ , lref = v × vtblpnum2, vtblpnum = vols[v][vtblpnum2].pnum, avols[v][vtblpnum2].mapped?, n < # wlar, vtblpnum2 < # avols[v], vtblpnum2 < # vols[v], vtblpnum < # wlar, abs(avols, apebs, vols, q), bflipset-cons(bflipset, wlar), ebm-cons(avols), ubi-io-inv(apebs), unique-sqns(apebs), valid-ebatbl(apebs, wlar, vols, vtblpnum1), valid-eraseq(apebs, q), valid-eraseq(wlar, q), valid-eraseq(q), valid-global-sqn(apebs, sqnum), valid-vtbl(apebs, vols, wlar, vtblpnum1), valid-wl(apebs, wlar), v ∈ avols, v ∈ vols ⊦ ⟨ebm_unmap#(v, vtblpnum2; avols)⟩ abs(avols, apebs, vols[v, vols[v][vtblpnum2, unmapped]], q + eq-entry(vtblpnum, lref)), vols[v][vtblpnum2] = unmapped, VTBL_VOLID ∈ vols |
# apebs = # wlar, vols[v][vtblpnum2] = ⌜n⌝ , avols[v][vtblpnum2].mapped?, vtblpnum2 < # avols[v], vtblpnum2 < # vols[v], n < # wlar, abs(avols, apebs, vols, q), bflipset-cons(bflipset, wlar), ebm-cons(avols), ubi-io-inv(apebs), unique-sqns(apebs), valid-ebatbl(apebs, wlar, vols, vtblpnum1), valid-eraseq(apebs, q), valid-eraseq(wlar, q), valid-eraseq(q), valid-global-sqn(apebs, sqnum), valid-vtbl(apebs, vols, wlar, vtblpnum1), valid-wl(apebs, wlar), v ∈ avols, v ∈ vols, ¬ VTBL_VOLID ∈ vols ⊦ ⟨ebm_unmap#(v, vtblpnum2; avols)⟩ abs(avols, apebs, vols[v, vols[v][vtblpnum2, unmapped]], q + eq-entry(vols[v][vtblpnum2].pnum, v × vtblpnum2) ')
Used simplifier rules: ⊦ ⌜m⌝ .pnum = m; (s)% ⊦ unmapped ≠ ⌜m⌝ ; (s)%lf-01: ⊦ m < n ∧ n = n0 → m < n0; (forward) from specification nat-basic% ⊦ q + eqent = q + eqent '; (s)