| wlar[n1, wl-entry(m1, used)][n0, wl-entry(m0, erasing)][n2] = wl-entry(m4, used), wlar[n1] = wl-entry(m2, free), apebs[n2] = mkpeb(aehdr, avidhdr(v0, m5, m6, m7, m8), buf, m3, boolvar), 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][m5] = ⌜n2⌝ ∧ v0 ∈ vols[v, fill(mkebatbl(n), unmapped)] ∧ m5 < # vols[v, fill(mkebatbl(n), unmapped)][v0] |
apebs[n2] = mkpeb(aehdr, avidhdr(v0, m5, m6, m7, m8), buf, m3, boolvar), wlar[n1] = wl-entry(m2, free), wlar[n1, wl-entry(m1, used)][n0, wl-entry(m0, erasing)][n2] = wl-entry(m4, used), n2 < # wlar, n2 < # apebs, ∀ 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, n2 = n0, v ∈ vols, vols[v, fill(mkebatbl(n), unmapped)][v0][m5] = ⌜n2⌝ ∧ v0 ∈ vols[v, fill(mkebatbl(n), unmapped)] ∧ m5 < # vols[v, fill(mkebatbl(n), unmapped)][v0]
Used simplifier rules: ⊦ # wlar[n, wle] = # wlar; (s)% ⊦ m < n ↔ ¬ n ≤ m; (ss)% ⊦ m < n → (n ≤ m ↔ false); (s)%m < # wlar ⊦ wlar[m, wle][m] = wle; (s)% ⊦ wl-entry(m, stat) = wl-entry(m0, stat0) ↔ m = m0 ∧ stat = stat0; (ws)% ⊦ used ≠ erasing; (s) Used formulas: n2 = n0