| # wlar1 = # wlar, # apebs = # wlar, # apebs0 = # wlar, avhdr0.leb = VTBL_LNUM, avhdr0.vol = VTBL_VOLID, apebs[n2] = mkpeb(aehdr, avhdr0, buf, m2, false), wlar[vtblpnum1] = wl-entry(m1, free), wlar[n2] = wl-entry(m0, used), apebs0[vtblpnum1] = mkpeb(aehdr0, avhdr, buf, align↑(datasize(buf, LEB_SIZE), EB_PAGE_SIZE), boolvar), wlar1[n2] = wl-entry(m0, stat), wlar1[vtblpnum1] = wl-entry(m1, stat0), ecs(wlar1) = ecs(wlar), Δ wlar1 = Δ wlar, vtblpnum1 < # wlar, n2 < # wlar, bflipset-cons(bflipset0, wlar), bflipset-cons(bflipset, wlar1), id(apebs0, apebs, mapped-pebs(vols)), id○(apebs0, apebs, vtblpnum1), is-aligned(LEB_SIZE, EB_PAGE_SIZE), ubi-io-inv(apebs), ubi-io-inv(apebs0), ubi-io-peb-inv(mkpeb(aehdr, avhdr0, buf, m2, false)), ubi-io-peb-inv(mkpeb(aehdr0, avhdr, buf, align↑(datasize(buf, LEB_SIZE), EB_PAGE_SIZE), boolvar)), unique-sqns(apebs), unique-sqns(apebs0), valid-ebatbl(apebs0, wlar1, vols, n0), valid-ebatbl(apebs, wlar, vols, n2), valid-eraseq(apebs, q), valid-eraseq(wlar, q), valid-eraseq(q), valid-eraseq(apebs0, q + eq-entry(n2, VTBL_VOLID × VTBL_LNUM) '), valid-eraseq(wlar1, q + eq-entry(n2, VTBL_VOLID × VTBL_LNUM) '), valid-eraseq(q + eq-entry(n2, VTBL_VOLID × VTBL_LNUM) '), valid-global-sqn(apebs, n1), valid-global-sqn(apebs0, n), valid-vtbl(apebs0, vols, wlar1, n0), valid-vtbl(apebs, vols, wlar, n2), valid-wl(apebs, wlar), valid-wl(apebs0, wlar1), m0 + WL_THRESHOLD ≤ m1, ∀ v, m. ¬ v ∈ vols ∧ is-encoded(to-vtbl(vols)[v, m], buf) → valid-ebatbl(apebs0, wlar1, vols[v, fill(mkebatbl(m), unmapped)], n0) ∧ valid-vtbl(apebs0, vols[v, fill(mkebatbl(m), unmapped)], wlar1, n0) ⊦ [ubi_erase_worker_helper#(n2; wlar1, apebs0; err); q0 := q + eq-entry(n2, VTBL_VOLID × VTBL_LNUM) '; if err = ESUCCESS then q0 := q0.butlast] ( # apebs0 = # wlar1 ∧ unique-sqns(apebs0) ∧ valid-global-sqn(apebs0, n) ∧ valid-wl(apebs0, wlar1) ∧ valid-eraseq(q0) ∧ valid-eraseq(wlar1, q0) ∧ valid-eraseq(apebs0, q0) ∧ bflipset-cons(bflipset, wlar1) ∧ valid-ebatbl(apebs0, wlar1, vols, n0) ∧ valid-vtbl(apebs0, vols, wlar1, n0) ∧ ubi-io-inv(apebs0) ∧ ( id(apebs0, apebs, mapped-pebs(vols)) ∧ q0.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⌝ ]] ∧ id(apebs0, apebs, mapped-pebs(vols) -- vols[v][m].pnum) ∧ apebs0[n].data = apebs[vols[v][m].pnum].data ∧ apebs0[n].fill ≤ apebs[vols[v][m].pnum].fill ∧ q0.lebrefs ⊆ q.lebrefs ++ (v × m))) → err = ESUCCESS → Δ wlar1 < Δ wlar), vtblpnum1 = n2, VTBL_VOLID ∈ vols |
# apebs0 = # wlar, # apebs = # wlar, # wlar1 = # wlar, avhdr0.leb = VTBL_LNUM, avhdr0.vol = VTBL_VOLID, wlar1[vtblpnum1] = wl-entry(m1, stat0), wlar1[n2] = wl-entry(m0, stat), apebs0[vtblpnum1] = mkpeb(aehdr0, avhdr, buf, align↑(datasize(buf, LEB_SIZE), EB_PAGE_SIZE), boolvar), wlar[n2] = wl-entry(m0, used), wlar[vtblpnum1] = wl-entry(m1, free), apebs[n2] = mkpeb(aehdr, avhdr0, buf, m2, false), ecs(wlar1) = ecs(wlar), Δ wlar1 = Δ wlar, vtblpnum1 ≠ n2, n2 < # wlar, vtblpnum1 < # wlar, bflipset-cons(bflipset, wlar1), bflipset-cons(bflipset0, wlar), id(apebs0, apebs, mapped-pebs(vols)), id○(apebs0, apebs, vtblpnum1), is-aligned(LEB_SIZE, EB_PAGE_SIZE), ubi-io-inv(apebs0), ubi-io-inv(apebs), ubi-io-peb-inv(mkpeb(aehdr0, avhdr, buf, align↑(datasize(buf, LEB_SIZE), EB_PAGE_SIZE), boolvar)), ubi-io-peb-inv(mkpeb(aehdr, avhdr0, buf, m2, false)), unique-sqns(apebs0), unique-sqns(apebs), valid-ebatbl(apebs, wlar, vols, n2), valid-ebatbl(apebs0, wlar1, vols, n0), valid-eraseq(q + eq-entry(n2, VTBL_VOLID × VTBL_LNUM) '), valid-eraseq(wlar1, q + eq-entry(n2, VTBL_VOLID × VTBL_LNUM) '), valid-eraseq(apebs0, q + eq-entry(n2, VTBL_VOLID × VTBL_LNUM) '), valid-eraseq(q), valid-eraseq(wlar, q), valid-eraseq(apebs, q), valid-global-sqn(apebs0, n), valid-global-sqn(apebs, n1), valid-vtbl(apebs, vols, wlar, n2), valid-vtbl(apebs0, vols, wlar1, n0), valid-wl(apebs0, wlar1), valid-wl(apebs, wlar), m0 + WL_THRESHOLD ≤ m1, ¬ VTBL_VOLID ∈ vols, ∀ v, m. ¬ v ∈ vols ∧ is-encoded(to-vtbl(vols)[v, m], buf) → valid-ebatbl(apebs0, wlar1, vols[v, fill(mkebatbl(m), unmapped)], n0) ∧ valid-vtbl(apebs0, vols[v, fill(mkebatbl(m), unmapped)], wlar1, n0) ⊦ [ubi_erase_worker_helper#(n2; wlar1, apebs0; err); q0 := q + eq-entry(n2, VTBL_VOLID × VTBL_LNUM) '; if err = ESUCCESS then q0 := q0.butlast] ( # apebs0 = # wlar1 ∧ unique-sqns(apebs0) ∧ valid-global-sqn(apebs0, n) ∧ valid-wl(apebs0, wlar1) ∧ valid-eraseq(q0) ∧ valid-eraseq(wlar1, q0) ∧ valid-eraseq(apebs0, q0) ∧ bflipset-cons(bflipset, wlar1) ∧ valid-ebatbl(apebs0, wlar1, vols, n0) ∧ valid-vtbl(apebs0, vols, wlar1, n0) ∧ ubi-io-inv(apebs0) ∧ ( id(apebs0, apebs, mapped-pebs(vols)) ∧ q0.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⌝ ]] ∧ id(apebs0, apebs, mapped-pebs(vols) -- vols[v][m].pnum) ∧ apebs0[n].data = apebs[vols[v][m].pnum].data ∧ apebs0[n].fill ≤ apebs[vols[v][m].pnum].fill ∧ q0.lebrefs ⊆ q.lebrefs ++ (v × m))) → err = ESUCCESS → Δ wlar1 < Δ wlar)