| # apebs = # wlar, avhdr0.sqn = valid-sqns(v, m, apebs).max, vols[v][m] = ⌜n1⌝ ∧ v ∈ vols ∧ m < # vols[v] ↔ wlar[n1].status = used ∧ n1 < # wlar ∧ apebs[n1].vidhdr.valid? ∧ apebs[n1].vidhdr.vol = v ∧ apebs[n1].vidhdr.leb = m ∧ n1 ≠ n0, apebs[n0] = mkpeb(aechdr(m6), avidhdr(VTBL_VOLID, VTBL_LNUM, valid-sqns(VTBL_VOLID, VTBL_LNUM, apebs).max, m8, m7), buf1, m2, false), apebs[n] = mkpeb(aehdr0, avhdr2, buf2, m3, boolvar0), apebs[n1] = mkpeb(aechdr(m4), avhdr0, buf0, m1, false), wlar[n0] = wl-entry(m6, used), wlar[n] = wl-entry(m5, erasing), wlar[n1] = wl-entry(m4, used), vols[v][m] = unmapped, n0 < # wlar, n1 < # wlar, n < # wlar, m < # vols[v], is-encoded(to-vtbl(vols), buf1), valid-peb(v, m, mkpeb(aehdr, avhdr, buf, m0, boolvar)), valid-peb(v, m, mkpeb(aehdr0, avhdr2, buf2, m3, boolvar0)), valid-peb(mkpeb(aehdr, avhdr, buf, m0, boolvar)), valid-peb(v, m, mkpeb(aechdr(m4), avhdr0, buf0, m1, false)), v ∈ vols, m8 ≠ 0 → m8 ≤ datasize(buf1) ∧ m7 = checksum(buf1, m8) ⊦ avhdr0.sqn = ((valid-sqns(v, m, apebs) -- avhdr2.sqn) ++ avhdr.sqn).max, n1 = n, VTBL_VOLID ∈ vols |
# apebs = # wlar, valid-sqns(VTBL_VOLID, VTBL_LNUM, apebs).max = valid-sqns(v, m, apebs).max, vols[v][m] = unmapped, wlar[n] = wl-entry(m5, erasing), wlar[n0] = wl-entry(m4, used), apebs[n] = mkpeb(aehdr0, avhdr2, buf2, m3, boolvar0), apebs[n0] = mkpeb(aechdr(m4), avidhdr(VTBL_VOLID, VTBL_LNUM, valid-sqns(v, m, apebs).max, m8, m7), buf0, m1, false), m < # vols[v], n < # wlar, n0 < # wlar, is-encoded(to-vtbl(vols), buf0), valid-peb(v, m, mkpeb(aechdr(m4), avidhdr(VTBL_VOLID, VTBL_LNUM, valid-sqns(v, m, apebs).max, m8, m7), buf0, m1, false)), valid-peb(mkpeb(aehdr, avhdr, buf, m0, boolvar)), valid-peb(v, m, mkpeb(aehdr0, avhdr2, buf2, m3, boolvar0)), valid-peb(v, m, mkpeb(aehdr, avhdr, buf, m0, boolvar)), v ∈ vols, m8 ≠ 0 → m8 ≤ datasize(buf0) ∧ m7 = checksum(buf0, m8) ⊦ valid-sqns(v, m, apebs).max = ((valid-sqns(v, m, apebs) -- avhdr2.sqn) ++ avhdr.sqn).max, n0 = n, VTBL_VOLID ∈ vols
Used simplifier rules: ⊦ avidhdr(v, m, m0, m1, m2).sqn = m0; (s)% ⊦ wl-entry(m, stat) = wl-entry(m0, stat0) ↔ m = m0 ∧ stat = stat0; (ws)% ⊦ aechdr(m) = aechdr(m0) ↔ m = m0; (s)%⊦ mkpeb(aehdr, avhdr, buf, m, boolvar) = mkpeb(aehdr0, avhdr0, buf0, m0, boolvar0) ↔ aehdr = aehdr0 ∧ avhdr = avhdr0 ∧ buf = buf0 ∧ m = m0 ∧ (boolvar ↔ boolvar0); (s)%lf-02: ⊦ m < n ∧ m = n0 → n0 < n; (forward) from specification nat-basic%⊦ valid-peb(v, m, mkpeb(aehdr, avhdr, buf, m0, boolvar)) → avhdr.leb = m; (s)%⊦ valid-peb(v, m, mkpeb(aehdr, avhdr, buf, m0, boolvar)) → avhdr.vol = v; (s)%⊦ valid-peb(v, m, mkpeb(aehdr, avhdr, buf, m0, boolvar)) → avhdr.valid?; (ss)% ⊦ mkpeb(aehdr, avhdr, buf, m, boolvar).vidhdr = avhdr; (s)% ⊦ wl-entry(m, stat).status = stat; (s)% ⊦ unmapped ≠ ⌜m⌝ ; (s)