| ∀ n. (q0 + eq-entry(n, none) ').lebrefs = q0.lebrefs ⊦ ((eqent + q0) + eq-entry(n, none) ').lebrefs = (eqent + q0).lebrefs |
∀ n. (q0 + eq-entry(n, none) ').lebrefs = q0.lebrefs ⊦ (q0 + eq-entry(n, none) ').lebrefs ∪ (eqent.lebref ≠ none ⊃ ∅ ++ eqent.lebref;∅) = q0.lebrefs ∪ (eqent.lebref ≠ none ⊃ ∅ ++ eqent.lebref;∅)
Used simplifier rules: lebrefs-rec: ⊦ (eqent ' + q).lebrefs = q.lebrefs ∪ (eqent.lebref ≠ none ⊃ {eqent.lebref} ;∅);% ⊦ {lref} = ∅ ++ lref; (s)%a: ⊦ (q + q0) + q1 = q + q0 + q1; from specification list[erasequeue-base]% ⊦ eqent + q = eqent ' + q; (s)