| # apebs = # wlar, # apebs0 = # wlar0, apebs0[n] = mkpeb(aehdr, avhdr, buf0, m0, boolvar), vols[v][m] = ⌜n0⌝ , apebs[n0] = mkpeb(aehdr0, avhdr0, buf0, m1, false), avols[v][m].mapped?, avhdr0.valid?, m < # vols[v], n0 < # wlar, abs(avols, apebs, vols, q), bflipset-cons(bflipset, wlar), bflipset-cons(bflipset0, wlar0), ebm-cons(avols), id(apebs0, apebs, mapped-pebs(vols) -- n0), ubi-io-inv(apebs), ubi-io-inv(apebs0), ubi-io-peb-inv(mkpeb(aehdr0, avhdr0, buf0, m1, false)), unique-sqns(apebs), unique-sqns(apebs0), valid-ebatbl(apebs, wlar, vols, vtblpnum), valid-ebatbl(apebs0, wlar0, vols[v, vols[v][m, ⌜n⌝ ]], vtblpnum0), valid-eraseq(apebs, q), valid-eraseq(wlar, q), valid-eraseq(q), valid-eraseq(apebs0, q0), valid-eraseq(wlar0, q0), valid-eraseq(q0), valid-global-sqn(apebs, sqnum), valid-global-sqn(apebs0, sqnum0), valid-vtbl(apebs, vols, wlar, vtblpnum), valid-vtbl(apebs0, vols, wlar0, vtblpnum0), valid-wl(apebs, wlar), valid-wl(apebs0, wlar0), v ∈ vols, m0 ≤ m1, q0.lebrefs ⊆ q.lebrefs ++ (v × m) ⊦ abs(avols, apebs0, vols[v, vols[v][m, ⌜n⌝ ]], q0), VTBL_VOLID ∈ vols, abs(avols, apebs0, vols[v, vols[v][m, ⌜n⌝ ]], q) ∧ avols[v][m] ≠ erased, abs○(avols, apebs0, vols[v, vols[v][m, ⌜n⌝ ]], q, v, m) ∧ v ∈ vols[v, vols[v][m, ⌜n⌝ ]] ∧ m < # vols[v, vols[v][m, ⌜n⌝ ]][v] ∧ avols[v][m] = mapped(apebs0[n].data, avols[v][m].fill) ∧ vols[v, vols[v][m, ⌜n⌝ ]][v][m] = ⌜n⌝ ∧ apebs0[n].data = apebs0[n].data ∧ apebs0[n].fill ≤ avols[v][m].fill |
# apebs = # wlar, # apebs0 = # wlar0, apebs0[n] = mkpeb(aehdr, avhdr, buf0, m0, boolvar), vols[v][m] = ⌜n0⌝ , apebs[n0] = mkpeb(aehdr0, avhdr0, buf0, m1, false), avols[v][m].mapped?, avhdr0.valid?, m < # vols[v], n0 < # wlar, abs(avols, apebs, vols, q), abs○(avols, apebs0, vols[v, vols[v][m, ⌜n⌝ ]], q, v, m), bflipset-cons(bflipset, wlar), bflipset-cons(bflipset0, wlar0), ebm-cons(avols), id(apebs0, apebs, mapped-pebs(vols) -- n0), ubi-io-inv(apebs), ubi-io-inv(apebs0), ubi-io-peb-inv(mkpeb(aehdr0, avhdr0, buf0, m1, false)), unique-sqns(apebs), unique-sqns(apebs0), valid-ebatbl(apebs, wlar, vols, vtblpnum), valid-ebatbl(apebs0, wlar0, vols[v, vols[v][m, ⌜n⌝ ]], vtblpnum0), valid-eraseq(apebs, q), valid-eraseq(wlar, q), valid-eraseq(q), valid-eraseq(apebs0, q0), valid-eraseq(wlar0, q0), valid-eraseq(q0), valid-global-sqn(apebs, sqnum), valid-global-sqn(apebs0, sqnum0), valid-vtbl(apebs, vols, wlar, vtblpnum), valid-vtbl(apebs0, vols, wlar0, vtblpnum0), valid-wl(apebs, wlar), valid-wl(apebs0, wlar0), v ∈ vols, m0 ≤ m1, q0.lebrefs ⊆ q.lebrefs ++ (v × m) ⊦ abs(avols, apebs0, vols[v, vols[v][m, ⌜n⌝ ]], q0), VTBL_VOLID ∈ vols, abs(avols, apebs0, vols[v, vols[v][m, ⌜n⌝ ]], q) ∧ avols[v][m] ≠ erased, m0 ≤ avols[v][m].fill ∧ avols[v][m] = mapped(buf0, avols[v][m].fill)
Used simplifier rules: ⊦ abs(avols, apebs0, vols, q) ∧ v ∈ vols ∧ m < # vols[v] ∧ vols[v][m] = ⌜n⌝ ∧ id(apebs1, apebs0, mapped-pebs(vols) -- n) ∧ valid-ebatbl(apebs0, wlar, vols, n0) → abs○(avols, apebs1, vols, q, v, m); (ss)%⊦ v ∈ vols ∧ m < # vols[v] → ( abs○(avols, apebs, vols[v, vols[v][m, ebae]], q, v, m) ↔ abs○(avols, apebs, vols, q, v, m)); (ss)% ⊦ mkpeb(aehdr, avhdr, buf, m, boolvar).fill = m; (s)% ⊦ mkpeb(aehdr, avhdr, buf, m, boolvar).data = buf; (s)% ⊦ ⌜m⌝ = ⌜m0⌝ ↔ m = m0; (s)% ⊦ m < # ebatbl → ebatbl[m, ebae][m] = ebae; (s)% ⊦ # ebatbl[n, ebae] = # ebatbl; (s)% ⊦ vols[v, ebatbl][v] = ebatbl; (s)% ⊦ v ∈ vols[v, ebatbl]; (s)