| # wlar = # wlar0, # apebs0 = # wlar0, apebs0[vols0[v][m].pnum] = mkpeb(aehdr, avhdr, buf, m0, boolvar), m < # vols0[v], abs(avols0, apebs0, vols, q), bflipset-cons(bflipset0, wlar0), bflipset-cons(bflipset, wlar), ebm-cons(avols0), is-max(apebs0, vols0, wlar0, q0, bflipset0, vtblpnum3, sqnum), ubi-io-inv(apebs0), unique-sqns(apebs0), valid-ebatbl(apebs0, wlar0, vols0, vtblpnum3), valid-ebatbl(apebs0, wlar, vols, vtblpnum), valid-eraseq(apebs0, q0), valid-eraseq(wlar0, q0), valid-eraseq(q0), valid-eraseq(apebs0, q), valid-eraseq(wlar, q), valid-eraseq(q), valid-global-sqn(apebs0, sqnum), valid-global-sqn(apebs0, vtblpnum0), valid-vtbl(apebs0, vols0, wlar0, vtblpnum3), valid-vtbl(apebs0, vols, wlar, vtblpnum), valid-wl(apebs0, wlar0), valid-wl(apebs0, wlar), v ∈ vols0, vols ⊆ vols0, q0.lebrefs ⊆ q.lebrefs, vols0⌈vols, q⌉ ⊦ vols0[v][m] = unmapped, VTBL_VOLID ∈ vols, VTBL_VOLID ∈ vols0, m0 ≤ (avols0[v][m].mapped? ⊃ avols0[v][m].fill;m0) |
# wlar = # wlar0, # apebs0 = # wlar0, apebs0[n] = mkpeb(aehdr, avhdr, buf, m0, false), vols0[v][m] = ⌜n⌝ , avhdr.valid?, (avols0[v][m].mapped? ⊃ avols0[v][m].fill;m0) < m0, m < # vols0[v], n < # wlar0, abs(avols0, apebs0, vols, q), bflipset-cons(bflipset0, wlar0), bflipset-cons(bflipset, wlar), ebm-cons(avols0), is-max(apebs0, vols0, wlar0, q0, bflipset0, vtblpnum3, sqnum), ubi-io-inv(apebs0), ubi-io-peb-inv(mkpeb(aehdr, avhdr, buf, m0, false)), unique-sqns(apebs0), valid-ebatbl(apebs0, wlar0, vols0, vtblpnum3), valid-ebatbl(apebs0, wlar, vols, vtblpnum), valid-eraseq(apebs0, q0), valid-eraseq(wlar0, q0), valid-eraseq(q0), valid-eraseq(apebs0, q), valid-eraseq(wlar, q), valid-eraseq(q), valid-global-sqn(apebs0, sqnum), valid-global-sqn(apebs0, vtblpnum0), valid-vtbl(apebs0, vols0, wlar0, vtblpnum3), valid-vtbl(apebs0, vols, wlar, vtblpnum), valid-wl(apebs0, wlar0), valid-wl(apebs0, wlar), v ∈ vols0, vols ⊆ vols0, q0.lebrefs ⊆ q.lebrefs, vols0⌈vols, q⌉ ⊦ VTBL_VOLID ∈ vols, VTBL_VOLID ∈ vols0
Used simplifier rules: lf-elim-unmapped: ⊦ vols[v][m] ≠ unmapped → (∃ n. vols[v][m] = ⌜n⌝ );%lf-mapped-in-apebs: ⊦ v ∈ vols ∧ m < # vols[v] ∧ vols[v][m] = ⌜n⌝ ∧ valid-ebatbl(apebs, wlar, vols, n0) → n < # apebs;%lf-mapped-valid-vidhdr: ⊦ v ∈ vols ∧ m < # vols[v] ∧ vols[v][m] = ⌜n⌝ ∧ valid-ebatbl(apebs, wlar, vols, n0) ∧ apebs[n] = mkpeb(aehdr, avhdr, buf, m0, boolvar) → avhdr.valid?;%lf-mapped-not-bad: ⊦ v ∈ vols ∧ m < # vols[v] ∧ vols[v][m] = ⌜n⌝ ∧ valid-ebatbl(apebs, wlar, vols, n0) ∧ valid-wl(apebs, wlar) ∧ apebs[n] = mkpeb(aehdr, avhdr, buf, m0, boolvar) → ¬ boolvar;%lf-01: ⊦ m < n ∧ n = n0 → m < n0; (forward) from specification nat-basic%ubi-io-inv-fwd: n < # apebs ⊦ apebs[n] = apeb ∧ ubi-io-inv(apebs) → ubi-io-peb-inv(apeb); (forward) from specification ubi-asm% ⊦ m < n → (n ≤ m ↔ false); (s)% ⊦ m < n ↔ ¬ n ≤ m; (ss)% ⊦ unmapped ≠ ⌜m⌝ ; (s)% ⊦ ⌜m⌝ .pnum = m; (s)% ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ m ≤ n ↔ ¬ n < m; (ss)