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