| eq-entry(m, lref) ∈ (v0 = v ⊃ q0 - v;eq-entry(m0, v0 × m1) ' + (q0 - v)), ∀ m, lref, v. eq-entry(m, lref) ∈ q0 - v → (∃ eqent0. eqent0.pnum = m ∧ eqent0 ∈ q0) ⊦ v0 = v, ∃ eqent0. eqent0.pnum = m ∧ (eqent0 = eq-entry(m0, v0 × m1) ∨ eqent0 ∈ q0) |
∀ m, lref, v. eq-entry(m, lref) ∈ q0 - v → (∃ eqent0. eqent0.pnum = m ∧ eqent0 ∈ q0), eq-entry(m, lref) = eq-entry(m0, v0 × m1) ∨ eq-entry(m, lref) ∈ q0 - v ⊦ v0 = v, ∃ eqent0. eqent0.pnum = m ∧ (eqent0 = eq-entry(m0, v0 × m1) ∨ eqent0 ∈ q0)
Used simplifier rules: a: ⊦ (q + q0) + q1 = q + q0 + q1; from specification list[erasequeue-base]% ⊦ eqent ∈ eqent0 ' + q ↔ eqent = eqent0 ∨ eqent ∈ q; (s)