| # apebs = # wlar, # apebs1 = # wlar0, # apebs0 = # wlar, # wlar2 = # wlar, wlar2[m].status ≠ used, vtblpnum ≠ m, m < # wlar, bflipset-cons(bflipset, wlar), bflipset-cons(bflipset, wlar0), id(apebs0, apebs1, mapped-pebs(vols)), id(apebs0, apebs, mapped-pebs(vols)), id(apebs, apebs1, mapped-pebs(vols)), id○(wlar2, wlar, m), id○(apebs0, apebs, m), ubi-io-inv(apebs0), ubi-io-inv(apebs1), ubi-io-inv(apebs), unique-sqns(apebs), unique-sqns(apebs1), valid-ebatbl(apebs, wlar, vols, vtblpnum), valid-ebatbl(apebs1, wlar0, vols, vtblpnum), valid-eraseq(apebs, eq-entry(m, lref) ' + q0), valid-eraseq(wlar, eq-entry(m, lref) ' + q0), valid-eraseq(eq-entry(m, lref) ' + q0), valid-eraseq(apebs1, q2), valid-eraseq(wlar0, q2), valid-eraseq(q2), valid-global-sqn(apebs, sqnum), valid-global-sqn(apebs1, sqnum), valid-vtbl(apebs, vols, wlar, vtblpnum), valid-vtbl(apebs1, vols, wlar0, vtblpnum), valid-wl(apebs, wlar), valid-wl(apebs1, wlar0), eq-entry(m, lref) ∈ q2, q0 ⊆ q2, ¬ vtblpnum ∈ q0, ¬ VTBL_VOLID ∈ vols, ¬ vtblpnum ∈ q2, err = ESUCCESS → unique-sqns(apebs0) ∧ valid-global-sqn(apebs0, sqnum) ∧ valid-wl(apebs0, wlar2) ∧ valid-eraseq(q0) ∧ valid-eraseq(wlar2, q0) ∧ valid-eraseq(apebs0, q0) ∧ bflipset-cons(bflipset, wlar2) ∧ valid-ebatbl(apebs0, wlar2, vols, vtblpnum) ∧ valid-vtbl(apebs0, vols, wlar2, vtblpnum), err ≠ ESUCCESS → unique-sqns(apebs0) ∧ valid-global-sqn(apebs0, sqnum) ∧ valid-wl(apebs0, wlar2) ∧ valid-eraseq(wlar2, eq-entry(m, lref) ' + q0) ∧ valid-eraseq(apebs0, eq-entry(m, lref) ' + q0) ∧ bflipset-cons(bflipset, wlar2) ∧ valid-ebatbl(apebs0, wlar2, vols, vtblpnum) ∧ valid-vtbl(apebs0, vols, wlar2, vtblpnum), err = ESUCCESS ∨ ⌊err⌋ ⊦ ⟪q := eq-entry(m, lref) ' + q0; if err = ESUCCESS then q := q.tail⟫ ( unique-sqns(apebs0) ∧ valid-global-sqn(apebs0, sqnum) ∧ valid-wl(apebs0, wlar2) ∧ valid-eraseq(q) ∧ valid-eraseq(wlar2, q) ∧ valid-eraseq(apebs0, q) ∧ bflipset-cons(bflipset, wlar2) ∧ valid-ebatbl(apebs0, wlar2, vols, vtblpnum) ∧ valid-vtbl(apebs0, vols, wlar2, vtblpnum) ∧ q ⊆ q2 ∧ (err = ESUCCESS ∨ ⌊err⌋ ) ∧ ¬ # q0 < (err = ESUCCESS ⊃ # q;0)) |
# wlar2 = # wlar, # apebs0 = # wlar, # apebs1 = # wlar0, # apebs = # wlar, q = eq-entry(m, lref) ' + q0, m < # wlar, bflipset-cons(bflipset, wlar0), bflipset-cons(bflipset, wlar), id(apebs, apebs1, mapped-pebs(vols)), id(apebs0, apebs, mapped-pebs(vols)), id(apebs0, apebs1, mapped-pebs(vols)), id○(apebs0, apebs, m), id○(wlar2, wlar, m), ubi-io-inv(apebs), ubi-io-inv(apebs1), ubi-io-inv(apebs0), unique-sqns(apebs1), unique-sqns(apebs), valid-ebatbl(apebs1, wlar0, vols, vtblpnum), valid-ebatbl(apebs, wlar, vols, vtblpnum), valid-eraseq(q2), valid-eraseq(wlar0, q2), valid-eraseq(apebs1, q2), valid-eraseq(eq-entry(m, lref) ' + q0), valid-eraseq(wlar, eq-entry(m, lref) ' + q0), valid-eraseq(apebs, eq-entry(m, lref) ' + q0), valid-global-sqn(apebs1, sqnum), valid-global-sqn(apebs, sqnum), valid-vtbl(apebs1, vols, wlar0, vtblpnum), valid-vtbl(apebs, vols, wlar, vtblpnum), valid-wl(apebs1, wlar0), valid-wl(apebs, wlar), eq-entry(m, lref) ∈ q2, q0 ⊆ q2, err ≠ ESUCCESS → unique-sqns(apebs0) ∧ valid-global-sqn(apebs0, sqnum) ∧ valid-wl(apebs0, wlar2) ∧ valid-eraseq(wlar2, eq-entry(m, lref) ' + q0) ∧ valid-eraseq(apebs0, eq-entry(m, lref) ' + q0) ∧ bflipset-cons(bflipset, wlar2) ∧ valid-ebatbl(apebs0, wlar2, vols, vtblpnum) ∧ valid-vtbl(apebs0, vols, wlar2, vtblpnum), err = ESUCCESS → unique-sqns(apebs0) ∧ valid-global-sqn(apebs0, sqnum) ∧ valid-wl(apebs0, wlar2) ∧ valid-eraseq(q0) ∧ valid-eraseq(wlar2, q0) ∧ valid-eraseq(apebs0, q0) ∧ bflipset-cons(bflipset, wlar2) ∧ valid-ebatbl(apebs0, wlar2, vols, vtblpnum) ∧ valid-vtbl(apebs0, vols, wlar2, vtblpnum), err = ESUCCESS ∨ ⌊err⌋ ⊦ ⟪if err = ESUCCESS then q := q.tail⟫ ( unique-sqns(apebs0) ∧ valid-global-sqn(apebs0, sqnum) ∧ valid-wl(apebs0, wlar2) ∧ valid-eraseq(q) ∧ valid-eraseq(wlar2, q) ∧ valid-eraseq(apebs0, q) ∧ bflipset-cons(bflipset, wlar2) ∧ valid-ebatbl(apebs0, wlar2, vols, vtblpnum) ∧ valid-vtbl(apebs0, vols, wlar2, vtblpnum) ∧ q ⊆ q2 ∧ (err = ESUCCESS ∨ ⌊err⌋ ) ∧ ¬ # q0 < (err = ESUCCESS ⊃ # q;0)), wlar2[m].status = used, vtblpnum = m, vtblpnum ∈ q0, VTBL_VOLID ∈ vols, vtblpnum ∈ q2