| # apebs = # wlar, vtblpnum = vtblpnum1, vtblpnum0 = vtblpnum2, vtblpnum2 < # avols[v], 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(q), valid-eraseq(wlar, q), valid-eraseq(apebs, q), valid-global-sqn(apebs, sqnum), valid-vtbl(apebs, vols, wlar, vtblpnum1), valid-wl(apebs, wlar), v ∈ avols ⊦ ⟪if v ∈ vols ∧ vtblpnum0 < # vols[v] then {ubi_unmap#(v, vtblpnum0; vols, wlar, q, bflipset); ubi_erase_all#(vols, bflipset, vtblpnum, sqnum; wlar, q, apebs; err)} else abort⟫ ⟨ebm_erase#(v, vtblpnum2; avols; err0)⟩ (abs(avols, apebs, vols, q) ∧ err = err0), VTBL_VOLID ∈ vols |
# apebs = # wlar, vtblpnum = vtblpnum1, vtblpnum0 = vtblpnum2, vtblpnum2 < # avols[v], 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 ⊦ ⟪ubi_unmap#(v, vtblpnum0; vols, wlar, q, bflipset); ubi_erase_all#(vols, bflipset, vtblpnum, sqnum; wlar, q, apebs; err)⟫ ⟨ebm_erase#(v, vtblpnum2; avols; err0)⟩ (abs(avols, apebs, vols, q) ∧ err = err0), VTBL_VOLID ∈ vols
Used simplifier rules: ⊦ v ∈ avols ∧ abs(avols, apebs, vols, q) → v ∈ vols; (ss)%⊦ v ∈ avols ∧ m < # avols[v] ∧ abs(avols, apebs, vols, q) → m < # vols[v]; (ss)