| # apebs = # wlar, wlar[n] = wl-entry(m5, stat), apebs[n] = mkpeb(aehdr0, avhdr0, buf0, m3, boolvar), n < # wlar, m < # wlar, n < # wlar → (wlar[n].status = erroneous ↔ apebs[n].bad) ∧ (wlar[n].status = free → apebs[n].vidhdr = empty) ∧ (wlar[n].status ≠ erroneous ∧ wlar[n].status ≠ erasing → apebs[n].echdr = aechdr(wlar[n].ec)) ∧ (wlar[n].status = used → (∃ v, m. valid-peb(v, m, apebs[n]) ∧ apebs[n].vidhdr.sqn = valid-sqns(v, m, apebs).max)) ⊦ n = m, valid-peb(mkpeb(aehdr, avhdr, buf, m2, false)), (stat = erroneous ↔ boolvar) ∧ (stat = free → avhdr0 = empty) ∧ (stat ≠ erroneous ∧ stat ≠ erasing → aehdr0 = aechdr(m5)) ∧ ( stat = used → (∃ v, m0. valid-peb(v, m0, mkpeb(aehdr0, avhdr0, buf0, m3, false)) ∧ avhdr0.sqn = valid-sqns(v, m0, apebs[m, mkpeb(aehdr, avhdr, buf, m2, false)]).max)) |
# apebs = # wlar, avhdr0.sqn = valid-sqns(v, m0, apebs).max, apebs[n] = mkpeb(aechdr(m5), avhdr0, buf0, m3, false), wlar[n] = wl-entry(m5, used), m < # wlar, n < # wlar, valid-peb(v, m0, mkpeb(aechdr(m5), avhdr0, buf0, m3, false)) ⊦ avhdr0.sqn = valid-sqns(v, m0, apebs[m, mkpeb(aehdr, avhdr, buf, m2, false)]).max, n = m, valid-peb(mkpeb(aehdr, avhdr, buf, m2, false))
Used simplifier rules: ⊦ used ≠ erasing; (s)%⊦ valid-peb(v0, m0, apeb) → (valid-peb(v1, m1, apeb) ↔ v0 = v1 ∧ m0 = m1); (s)% ⊦ used ≠ free; (s)% ⊦ used ≠ erroneous; (s)% ⊦ wl-entry(m, stat).ec = m; (s)% ⊦ mkpeb(aehdr, avhdr, buf, m, boolvar).echdr = aehdr; (s)% ⊦ mkpeb(aehdr, avhdr, buf, m, boolvar).vidhdr = avhdr; (s)% ⊦ mkpeb(aehdr, avhdr, buf, m, boolvar).bad ↔ boolvar; (s)% ⊦ wl-entry(m, stat).status = stat; (s)