| valid-eraseq(apebs, q0 + eqent ' + q1) ⊦ valid-eraseq(apebs, q0 + q1) |
valid-eraseq(apebs, (eqent0 + q) + eqent ' + q1), ∀ apebs, eqent, q1. valid-eraseq(apebs, q + eqent ' + q1) → valid-eraseq(apebs, q + q1) ⊦ valid-eraseq(apebs, (eqent0 + q) + q1)
Used simplifier rules: valid-eraseqp-rec: ⊦ valid-eraseq(apebs, eqent ' + q) ↔ eqent.pnum < # apebs ∧ ( valid-peb(apebs[eqent.pnum]) → eqent.lebref = apebs[eqent.pnum].vidhdr.vol × apebs[eqent.pnum].vidhdr.leb) ∧ valid-eraseq(apebs, q);%queue freely generated by [], +;;% ⊦ [] + q = q; (s)%a: ⊦ (q + q0) + q1 = q + q0 + q1; from specification list[erasequeue-base]