| ⊦ n ∈ q + eq-entry(n0, lref) ' ↔ n ∈ q, n = n0 |
⊦ (∃ eqent. eqent.pnum = n ∧ (eqent ∈ q ∨ eqent = eq-entry(n0, lref))) ↔ (∃ eqent. eqent.pnum = n ∧ eqent ∈ q), n = n0
Used simplifier rules: queue-in: ⊦ n ∈ q ↔ (∃ eqent. eqent.pnum = n ∧ eqent ∈ q);%a: ⊦ (q + q0) + q1 = q + q0 + q1; from specification list[erasequeue-base]% ⊦ eqent ∈ eqent0 ' ↔ eqent = eqent0; (s)% ⊦ eqent ∈ q + q0 ↔ eqent ∈ q ∨ eqent ∈ q0; (s)