| # apebs = # wlar, ebae = vols[v][vtblpnum0], vtblpnum = ebae.pnum, vtblpnum0 < # vols[v], bflipset-cons(bflipset, wlar), 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 ∈ vols ⊦ ⟪ubi_wl_put_peb#(v × vtblpnum0, vtblpnum; wlar, q)⟫ ( # apebs = # wlar ∧ valid-wl(apebs, wlar) ∧ valid-eraseq(q) ∧ valid-eraseq(wlar, q) ∧ valid-eraseq(apebs, q) ∧ ¬ VTBL_VOLID ∈ vols[v, vols[v][vtblpnum0, unmapped]] ∧ bflipset-cons(bflipset -- vtblpnum, wlar) ∧ valid-ebatbl(apebs, wlar, vols[v, vols[v][vtblpnum0, unmapped]], vtblpnum1) ∧ valid-vtbl(apebs, vols[v, vols[v][vtblpnum0, unmapped]], wlar, vtblpnum1)), ebae = unmapped, vtblpnum1 ∈ q, VTBL_VOLID ∈ vols |
# apebs = # wlar, vols[v][vtblpnum0] ≠ unmapped, vtblpnum0 < # vols[v], bflipset-cons(bflipset, wlar), 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 ∈ vols, ¬ VTBL_VOLID ∈ vols, ¬ vtblpnum1 ∈ q ⊦ ⟪ubi_wl_put_peb#(v × vtblpnum0, vols[v][vtblpnum0].pnum; wlar, q)⟫ ( # apebs = # wlar ∧ valid-wl(apebs, wlar) ∧ valid-eraseq(q) ∧ valid-eraseq(wlar, q) ∧ valid-eraseq(apebs, q) ∧ bflipset-cons(bflipset -- vols[v][vtblpnum0].pnum, wlar) ∧ valid-ebatbl(apebs, wlar, vols[v, vols[v][vtblpnum0, unmapped]], vtblpnum1) ∧ valid-vtbl(apebs, vols, wlar, vtblpnum1))
Used simplifier rules: lf-vtbl-info: ⊦ valid-vtbl(apebs, vols, wlar, n) ∧ valid-eraseq(wlar, q) → ¬ n ∈ q;%⊦ v ∈ vols → ( valid-vtbl(apebs, vols[v, vols[v][m, ebae]], wlar, n0) ↔ valid-vtbl(apebs, vols, wlar, n0)); (s)% ⊦ v ∈ vols[v0, ebatbl] ↔ v = v0 ∨ v ∈ vols; (ws)