| eqent0 = eq-entry(m, lref), valid-eraseq(q + eqent ' + q1), ∀ eqent, q1. valid-eraseq(q + eqent ' + q1) → valid-eraseq(q + q1) ⊦ m ∈ q1, m ∈ eqent ', m ∈ q, ¬ m ∈ q + q1 ∧ valid-eraseq(q + q1) |
valid-eraseq(q + eqent ' + q1), ∀ eqent, q1. valid-eraseq(q + eqent ' + q1) → valid-eraseq(q + q1) ⊦ m ∈ q, m ∈ eqent ', m ∈ q1, ¬ m ∈ q + q1 ∧ valid-eraseq(q + q1)