| apebs[n2] = mkpeb(aehdr, avhdr, buf, m3, boolvar), wlar[n1] = wl-entry(m2, free), wlar[n1, wl-entry(m1, used)][n0, wl-entry(m0, erasing)][n2] = wl-entry(m4, stat), ∀ v, m, n1. vols[v][m] = ⌜n1⌝ ∧ v ∈ vols ∧ m < # vols[v] ↔ wlar[n1].status = used ∧ n1 < # apebs ∧ n1 < # wlar ∧ apebs[n1].vidhdr.valid? ∧ apebs[n1].vidhdr.vol = v ∧ apebs[n1].vidhdr.leb = m ∧ n1 ≠ n0 ⊦ vols[v, fill(mkebatbl(n), unmapped)][v0][m] = ⌜n2⌝ ∧ v0 ∈ vols[v, fill(mkebatbl(n), unmapped)] ∧ m < # vols[v, fill(mkebatbl(n), unmapped)][v0] ↔ stat = used ∧ n2 < # apebs ∧ n2 < # wlar ∧ avhdr.valid? ∧ avhdr.vol = v0 ∧ avhdr.leb = m ∧ n2 ≠ n1, v ∈ vols |
wlar[n1, wl-entry(m1, used)][n0, wl-entry(m0, erasing)][n2] = wl-entry(m4, stat), wlar[n1] = wl-entry(m2, free), apebs[n2] = mkpeb(aehdr, avhdr, buf, m3, boolvar), vols[v, fill(mkebatbl(n), unmapped)][v0][m] = ⌜n2⌝ , m < # vols[v, fill(mkebatbl(n), unmapped)][v0], v0 ∈ vols[v, fill(mkebatbl(n), unmapped)], ∀ v, m, n1. vols[v][m] = ⌜n1⌝ ∧ v ∈ vols ∧ m < # vols[v] ↔ wlar[n1].status = used ∧ n1 < # apebs ∧ n1 < # wlar ∧ apebs[n1].vidhdr.valid? ∧ apebs[n1].vidhdr.vol = v ∧ apebs[n1].vidhdr.leb = m ∧ n1 ≠ n0 ⊦ v ∈ vols, stat = used ∧ n2 < # apebs ∧ n2 < # wlar ∧ avhdr.valid? ∧ avhdr.vol = v0 ∧ avhdr.leb = m ∧ n2 ≠ n1
avhdr.leb = m, avhdr.vol = v0, wlar[n1, wl-entry(m1, used)][n0, wl-entry(m0, erasing)][n2] = wl-entry(m4, stat), wlar[n1] = wl-entry(m2, free), apebs[n2] = mkpeb(aehdr, avhdr, buf, m3, boolvar), stat = used, avhdr.valid?, n2 < # apebs, n2 < # wlar, ∀ v, m, n1. vols[v][m] = ⌜n1⌝ ∧ v ∈ vols ∧ m < # vols[v] ↔ wlar[n1].status = used ∧ n1 < # apebs ∧ n1 < # wlar ∧ apebs[n1].vidhdr.valid? ∧ apebs[n1].vidhdr.vol = v ∧ apebs[n1].vidhdr.leb = m ∧ n1 ≠ n0 ⊦ n2 = n1, v ∈ vols, vols[v, fill(mkebatbl(n), unmapped)][v0][m] = ⌜n2⌝ ∧ v0 ∈ vols[v, fill(mkebatbl(n), unmapped)] ∧ m < # vols[v, fill(mkebatbl(n), unmapped)][v0]