| wlar[m, wl-entry(m1, erasing)][n] = wl-entry(m5, stat0), wlar[n] = wl-entry(m4, stat), wlar[m] = wl-entry(m0, erasing), apebs[n] = mkpeb(aehdr, avhdr, buf, m2, boolvar), n = m, m < # wlar, n < # wlar, ∀ n. 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)) ⊦ (stat0 = erroneous ↔ boolvar) ∧ (stat0 = free → avhdr = empty) ∧ (stat ≠ erroneous ∧ stat0 ≠ erasing → aehdr = aechdr(m4)) ∧ (stat0 = used → (∃ v, m3. valid-peb(v, m3, mkpeb(aehdr, avhdr, buf, m2, stat = erroneous)) ∧ avhdr.sqn = valid-sqns(v, m3, apebs).max)) |
wlar[m] = wl-entry(m0, erasing), apebs[m] = mkpeb(aehdr, avhdr, buf, m2, true), m < # wlar, ∀ n. 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)) ⊦
Used simplifier rules: ⊦ used ≠ erasing; (s)% ⊦ free ≠ erasing; (s)% ⊦ erroneous ≠ erasing; (s)% ⊦ wl-entry(m, stat) = wl-entry(m0, stat0) ↔ m = m0 ∧ stat = stat0; (ws)% ⊦ m < # wlar → wlar[m, wle][m] = wle; (s)