| ∀ n, v, m. (q0 + eq-entry(n, v × m) ').lebrefs = q0.lebrefs ++ (v × m) ⊦ ((eqent + q0) + eq-entry(n, v × m) ').lebrefs = (eqent + q0).lebrefs ++ (v × m) |
∀ n, v, m. (q0 + eq-entry(n, v × m) ').lebrefs = q0.lebrefs ++ (v × m) ⊦ (q0 + eq-entry(n, v × m) ').lebrefs ∪ (eqent.lebref ≠ none ⊃ ∅ ++ eqent.lebref;∅) = (q0.lebrefs ∪ (eqent.lebref ≠ none ⊃ ∅ ++ eqent.lebref;∅)) ++ (v × m)
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)