| n < # apebs, eqent.pnum < # apebs, valid-eraseq-strong(apebs, vtbl, q0), valid-peb(v, m, apebs[n]), ∀ n, apebs, vtbl, v, m. n < # apebs ∧ valid-eraseq-strong(apebs, vtbl, q0) ∧ valid-peb(v, m, apebs[n]) ∧ (¬ v ∈ vtbl ∨ ¬ m < vtbl[v]) → valid-eraseq-strong(apebs, vtbl, q0 + eq-entry(n, v × m) ') ∨ n ∈ q0, ∀ v, m. (valid-peb(v, m, apebs[eqent.pnum]) ↔ eqent.lebref = v × m) ∧ (eqent.lebref = v × m ∧ v ∈ vtbl ∧ m < vtbl[v] → apebs[eqent.pnum].vidhdr.sqn ≠ valid-sqns(v, m, apebs).max), ¬ v ∈ vtbl ∨ ¬ m < vtbl[v] ⊦ eqent.pnum ∈ q0, n ∈ eqent ', n ∈ q0, ¬ eqent.pnum ∈ q0 + eq-entry(n, v × m) ' ∧ valid-eraseq-strong(apebs, vtbl, q0 + eq-entry(n, v × m) ') |
eqent = eq-entry(m0, lref), m0 < # apebs, n < # apebs, valid-eraseq-strong(apebs, vtbl, q0), valid-peb(v, m, apebs[n]), ∀ 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), ∀ n, apebs, vtbl, v, m. n < # apebs ∧ valid-eraseq-strong(apebs, vtbl, q0) ∧ valid-peb(v, m, apebs[n]) ∧ (¬ v ∈ vtbl ∨ ¬ m < vtbl[v]) → valid-eraseq-strong(apebs, vtbl, q0 + eq-entry(n, v × m) ') ∨ n ∈ q0, ¬ v ∈ vtbl ∨ ¬ m < vtbl[v] ⊦ n ∈ q0, n ∈ eqent ', m0 ∈ q0, ¬ m0 ∈ q0 + eq-entry(n, v × m) ' ∧ valid-eraseq-strong(apebs, vtbl, q0 + eq-entry(n, v × m) ')
Used simplifier rules: ⊦ m = eqent.pnum ∧ lref = eqent.lebref ↔ eqent = eq-entry(m, lref); (elim) Used terms: eqent, m0, lref