| eqent = eq-entry(m0, lref), m0 < # apebs, valid-eraseq-strong(apebs, vtbl, q0), ∀ apebs, vtbl. valid-eraseq-strong(apebs, vtbl, q0) → valid-eraseq(apebs, q0), ∀ v, m. (valid-peb(v, m, apebs[m0]) ↔ lref = v × m) ∧ (lref = v × m ∧ v ∈ vtbl ∧ m < vtbl[v] → apebs[m0].vidhdr.sqn ≠ valid-sqns(v, m, apebs).max) ⊦ valid-eraseq(apebs, eqent ' + q0), m0 ∈ q0 |
m0 < # apebs, valid-eraseq-strong(apebs, vtbl, q0), ∀ v, m. (valid-peb(v, m, apebs[m0]) ↔ lref = v × m) ∧ (lref = v × m ∧ v ∈ vtbl ∧ m < vtbl[v] → apebs[m0].vidhdr.sqn ≠ valid-sqns(v, m, apebs).max), ∀ apebs, vtbl. valid-eraseq-strong(apebs, vtbl, q0) → valid-eraseq(apebs, q0) ⊦ valid-eraseq(apebs, eq-entry(m0, lref) ' + q0), m0 ∈ q0