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