| apebs[n0] = mkpeb(aehdr, avhdr, buf, m0, boolvar), wlar.mapIndices(nx, λ wle. wle.ec:= n)[n0] = wl-entry(m1, stat), n0 < # wlar.mapIndices(nx, λ wle. wle.ec:= n), # wlar < # wlar.mapIndices(nx, λ wle. wle.ec:= n), indices-erasing(wlar, nx), valid-indices(wlar, nx), # wlar ≤ n0, ∀ 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)) ⊦ dups(nx), (stat = erroneous ↔ boolvar) ∧ (stat = free → avhdr = empty) ∧ (stat ≠ erroneous ∧ stat ≠ erasing → aehdr = aechdr(m1)) ∧ (stat = used → (∃ v, m. valid-peb(v, m, mkpeb(aehdr, avhdr, buf, m0, false)) ∧ avhdr.sqn = valid-sqns(v, m, apebs).max)) |
⊦ valid-indices(wlar, nx) → # wlar.mapIndices(nx, f0) = # wlar
Used simplifier rules: ⊦ m < n → (n ≤ m ↔ false); (s) Used terms: λ wle. wle.ec:= n, nx, wlar