| # apebs1 = # wlar, # wlar0 = # wlar, # apebs = # wlar, # apebs0 = # wlar, # wlar2 = # wlar, avhdr.leb = VTBL_LNUM, avhdr.vol = VTBL_VOLID, apebs[vtblpnum4] = mkpeb(aehdr1, avhdr, buf, m3, false), apebs[vtblpnum1] = mkpeb(aehdr, empty, mkempbuf(LEB_SIZE), 0, false), wlar[vtblpnum4] = wl-entry(m1, used), wlar[vtblpnum1] = wl-entry(m0, free), apebs1[vtblpnum1] = mkpeb(aehdr0, avhdr0, buf, align↑(datasize(buf, LEB_SIZE), EB_PAGE_SIZE), boolvar), q1 = q + eq-entry(vtblpnum4, VTBL_VOLID × VTBL_LNUM) ', aehdr.valid?, vtblpnum1 < # wlar, vtblpnum4 < # wlar, bflipset-cons(bflipset1, wlar0), bflipset-cons(bflipset, wlar), bflipset-cons(bflipset0, wlar), id(apebs0, apebs, mapped-pebs(vols)), id(apebs0, apebs1, mapped-pebs(vols)), id(apebs1, apebs, mapped-pebs(vols)), id○(wlar2, wlar0, vtblpnum4), id○(apebs0, apebs1, vtblpnum4), id○(apebs1, apebs, vtblpnum1), is-aligned(LEB_SIZE, EB_PAGE_SIZE), ubi-io-inv(apebs0), ubi-io-inv(apebs), ubi-io-inv(apebs1), ubi-io-peb-inv(mkpeb(aehdr1, avhdr, buf, m3, false)), ubi-io-peb-inv(mkpeb(aehdr0, avhdr0, buf, align↑(datasize(buf, LEB_SIZE), EB_PAGE_SIZE), boolvar)), unique-sqns(apebs1), unique-sqns(apebs), valid-ebatbl(apebs, wlar, vols, vtblpnum4), valid-ebatbl(apebs1, wlar0, vols, vtblpnum), valid-eraseq(q + eq-entry(vtblpnum4, VTBL_VOLID × VTBL_LNUM) '), valid-eraseq(wlar0, q + eq-entry(vtblpnum4, VTBL_VOLID × VTBL_LNUM) '), valid-eraseq(apebs1, q + eq-entry(vtblpnum4, VTBL_VOLID × VTBL_LNUM) '), valid-eraseq(q), valid-eraseq(wlar, q), valid-eraseq(apebs, q), valid-global-sqn(apebs1, sqnum0), valid-global-sqn(apebs, sqnum), valid-peb(mkpeb(aehdr1, avhdr, buf, m3, false)), valid-vtbl(apebs, vols, wlar, vtblpnum4), valid-vtbl(apebs1, vols, wlar0, vtblpnum), valid-wl(apebs1, wlar0), valid-wl(apebs, wlar), bflipset = ∅ → m1 + WL_THRESHOLD ≤ m0, err = ESUCCESS → unique-sqns(apebs0) ∧ valid-global-sqn(apebs0, sqnum0) ∧ valid-wl(apebs0, wlar2) ∧ valid-eraseq(wlar2, q) ∧ valid-eraseq(apebs0, q) ∧ bflipset-cons(bflipset1, wlar2) ∧ valid-ebatbl(apebs0, wlar2, vols, vtblpnum) ∧ valid-vtbl(apebs0, vols, wlar2, vtblpnum), err ≠ ESUCCESS → unique-sqns(apebs0) ∧ valid-global-sqn(apebs0, sqnum0) ∧ valid-wl(apebs0, wlar2) ∧ valid-eraseq(wlar2, q + eq-entry(vtblpnum4, VTBL_VOLID × VTBL_LNUM) ') ∧ valid-eraseq(apebs0, q + eq-entry(vtblpnum4, VTBL_VOLID × VTBL_LNUM) ') ∧ bflipset-cons(bflipset1, wlar2) ∧ valid-ebatbl(apebs0, wlar2, vols, vtblpnum) ∧ valid-vtbl(apebs0, vols, wlar2, vtblpnum), ∀ v, m. ¬ v ∈ vols ∧ is-encoded(to-vtbl(vols)[v, m], buf) → valid-ebatbl(apebs1, wlar0, vols[v, fill(mkebatbl(m), unmapped)], vtblpnum) ∧ valid-vtbl(apebs1, vols[v, fill(mkebatbl(m), unmapped)], wlar0, vtblpnum), err = ESUCCESS ∨ ⌊err⌋ ⊦ ⟪skip⟫ ( unique-sqns(apebs0) ∧ valid-global-sqn(apebs0, sqnum0) ∧ valid-wl(apebs0, wlar2) ∧ valid-eraseq(q1) ∧ valid-eraseq(wlar2, q1) ∧ valid-eraseq(apebs0, q1) ∧ bflipset-cons(bflipset1, wlar2) ∧ valid-ebatbl(apebs0, wlar2, vols, vtblpnum) ∧ valid-vtbl(apebs0, vols, wlar2, vtblpnum) ∧ ( q1.lebrefs ⊆ q.lebrefs ++ (VTBL_VOLID × VTBL_LNUM) ∨ (∃ v, m, n. v ∈ vols ∧ m < # vols[v] ∧ vols[v][m] ≠ unmapped ∧ vols = vols[v, vols[v][m, ⌜n⌝ ]] ∧ apebs0[n].data = apebs[vols[v][m].pnum].data ∧ apebs0[n].fill ≤ apebs[vols[v][m].pnum].fill ∧ q1.lebrefs ⊆ q.lebrefs ++ (v × m)))), wlar2[vtblpnum4].status = used, err = ESUCCESS, vtblpnum = vtblpnum4, vtblpnum4 = vtblpnum1, vtblpnum4 ∈ q, VTBL_VOLID ∈ vols, vtblpnum ∈ q |
Used simplifier rules: ⊦ ⌊err⌋ → err ≠ ESUCCESS; (s)% ⊦ (q + eq-entry(n, v × m) ').lebrefs = q.lebrefs ++ (v × m); (s)%a: ⊦ (q + q0) + q1 = q + q0 + q1; from specification list[erasequeue-base]% ⊦ s1 ++ lref ⊆ s2 ++ lref ↔ s1 ⊆ s2 ++ lref; (s)% ⊦ s0 ⊆ s0 ++ lref; (s)