| # apebs = # wlar1, # wlar0 = # wlar1, apebs[n0].vidhdr.leb = VTBL_LNUM, avhdr0.sqn = valid-sqns(VTBL_VOLID, VTBL_LNUM, apebs).max, wlar0[n0].status = used, apebs[n0].vidhdr.vol = VTBL_VOLID, wlar0[m0] = wl-entry(m3, erasing), apebs[n0] = mkpeb(aehdr, avhdr, buf, m2, boolvar), wlar1[m0] = wl-entry(m5, used), apebs[m0] = mkpeb(aechdr(m5), avhdr0, buf0, m4, false), n0 < # apebs, n0 < # wlar0, m0 < # wlar1, bflipset-cons(bflipset0, wlar0), bflipset-cons(bflipset, wlar1), is-encoded(to-vtbl(vols0), apebs[n0].data), is-encoded(vtbl, buf), is-encoded(to-vtbl(vols1), buf0), unique-sqns(apebs), valid-ebatbl(apebs, wlar0, vols0, n0), valid-eraseq(apebs, q0), valid-eraseq(q0), valid-eraseq(apebs, q1), valid-eraseq(wlar1, q1), valid-eraseq(q1), valid-eraseq-strong(apebs, vtbl, q0), valid-global-sqn(apebs, n1), valid-global-sqn(apebs, m1), valid-peb(VTBL_VOLID, VTBL_LNUM, mkpeb(aechdr(m5), avhdr0, buf0, m4, false)), valid-wl(apebs, wlar0), eq-entry(m0, VTBL_VOLID × VTBL_LNUM) ∈ q0, m0 ∈ q0, ∀ v. (v ∈ vols1 ↔ v ∈ vols0) ∧ (v ∈ vols1 → # vols1[v] = # vols0[v] ∧ (∀ m. m < # vols1[v] ∧ vols1[v][m] ≠ unmapped → vols1[v][m] = vols0[v][m])) ⊦ avhdr0 = empty, VTBL_VOLID ∈ vols0, VTBL_VOLID ∈ vols1, VTBL_VOLID × VTBL_LNUM ∈ q1 |
# wlar0 = # wlar1, # apebs = # wlar1, avhdr.leb = VTBL_LNUM, avhdr0.sqn = valid-sqns(VTBL_VOLID, VTBL_LNUM, apebs).max, wlar0[n0].status = used, avhdr.vol = VTBL_VOLID, apebs[m0] = mkpeb(aechdr(m5), avhdr0, buf0, m4, false), wlar1[m0] = wl-entry(m5, used), apebs[n0] = mkpeb(aehdr, avhdr, buf, m2, boolvar), wlar0[m0] = wl-entry(m3, erasing), m0 < # wlar1, n0 < # wlar1, bflipset-cons(bflipset, wlar1), bflipset-cons(bflipset0, wlar0), is-encoded(to-vtbl(vols1), buf0), is-encoded(to-vtbl(vols0), buf), unique-sqns(apebs), valid-ebatbl(apebs, wlar0, vols0, n0), valid-eraseq(q1), valid-eraseq(wlar1, q1), valid-eraseq(apebs, q1), valid-eraseq(q0), valid-eraseq(apebs, q0), valid-eraseq-strong(apebs, to-vtbl(vols0), q0), valid-global-sqn(apebs, m1), valid-global-sqn(apebs, n1), valid-peb(VTBL_VOLID, VTBL_LNUM, mkpeb(aechdr(m5), avhdr0, buf0, m4, false)), valid-wl(apebs, wlar0), m0 ∈ q0, eq-entry(m0, VTBL_VOLID × VTBL_LNUM) ∈ q0, ∀ v. (v ∈ vols1 ↔ v ∈ vols0) ∧ (v ∈ vols1 → # vols1[v] = # vols0[v] ∧ (∀ m. m < # vols1[v] ∧ vols1[v][m] ≠ unmapped → vols1[v][m] = vols0[v][m])) ⊦ avhdr0 = empty, VTBL_VOLID × VTBL_LNUM ∈ q1, VTBL_VOLID ∈ vols1, VTBL_VOLID ∈ vols0
Used simplifier rules: ⊦ is-encoded(vtbl0, buf) → (is-encoded(vtbl1, buf) ↔ vtbl0 = vtbl1); (s)% ⊦ mkpeb(aehdr, avhdr, buf, m, boolvar).data = buf; (s)% ⊦ mkpeb(aehdr, avhdr, buf, m, boolvar).vidhdr = avhdr; (s)%lf-01: ⊦ m < n ∧ n = n0 → m < n0; (forward) from specification nat-basic