| # apebs = # wlar1, # wlar0 = # wlar1, wlar0[n] = wl-entry(m3, erasing), apebs[n0] = mkpeb(aehdr, avhdr, buf, m2, boolvar), wlar1[n] = wl-entry(m5, erasing), apebs[n] = mkpeb(aehdr0, avhdr0, buf0, m4, false), n < # wlar1, bflipset-cons(bflipset0, wlar0), bflipset-cons(bflipset, wlar1), is-encoded(vtbl, buf), unique-sqns(apebs), valid-ebatbl(apebs, wlar0, vols0, n0), valid-ebatbl(apebs, wlar1, vols1, m0), valid-eraseq(apebs, q0), valid-eraseq(q0), valid-eraseq(apebs, q1), valid-eraseq(q1), valid-eraseq-strong(apebs, vtbl, q0), valid-global-sqn(apebs, n1), valid-global-sqn(apebs, m1), valid-peb(v0, n2, mkpeb(aehdr0, avhdr0, buf0, m4, false)), valid-vtbl(apebs, vols0, wlar0, n0), valid-vtbl(apebs, vols1, wlar1, m0), valid-wl(apebs, wlar0), eq-entry(n, v0 × n2) ∈ q0, n ∈ q0, v0 ∈ vols0 ∧ n2 < # vols0[v0] → avhdr0.sqn ≠ valid-sqns(v0, n2, apebs).max, ∀ v. (v ∈ vols1 ↔ v ∈ vols0) ∧ (v ∈ vols1 → # vols1[v] = # vols0[v] ∧ (∀ m. m < # vols1[v] ∧ vols1[v][m] ≠ unmapped → vols1[v][m] = vols0[v][m])), ∃ eqent. eqent.pnum = n ∧ eqent ∈ q1 ⊦ avhdr0 = empty, VTBL_VOLID ∈ vols0, VTBL_VOLID ∈ vols1, v0 × n2 ∈ q1 |
# apebs = # wlar1, # wlar0 = # wlar1, wlar0[eqent.pnum] = wl-entry(m3, erasing), apebs[n0] = mkpeb(aehdr, avhdr, buf, m2, boolvar), wlar1[eqent.pnum] = wl-entry(m5, erasing), apebs[eqent.pnum] = mkpeb(aehdr0, avhdr0, buf0, m4, false), eqent.pnum < # wlar1, bflipset-cons(bflipset0, wlar0), bflipset-cons(bflipset, wlar1), is-encoded(vtbl, buf), unique-sqns(apebs), valid-ebatbl(apebs, wlar0, vols0, n0), valid-ebatbl(apebs, wlar1, vols1, m0), valid-eraseq(apebs, q0), valid-eraseq(q0), valid-eraseq(apebs, q1), valid-eraseq(q1), valid-eraseq-strong(apebs, vtbl, q0), valid-global-sqn(apebs, n1), valid-global-sqn(apebs, m1), valid-peb(v0, n2, mkpeb(aehdr0, avhdr0, buf0, m4, false)), valid-vtbl(apebs, vols0, wlar0, n0), valid-vtbl(apebs, vols1, wlar1, m0), valid-wl(apebs, wlar0), eq-entry(eqent.pnum, v0 × n2) ∈ q0, eqent.pnum ∈ q0, eqent ∈ q1, v0 ∈ vols0 ∧ n2 < # vols0[v0] → avhdr0.sqn ≠ valid-sqns(v0, n2, apebs).max, ∀ v. (v ∈ vols1 ↔ v ∈ vols0) ∧ (v ∈ vols1 → # vols1[v] = # vols0[v] ∧ (∀ m. m < # vols1[v] ∧ vols1[v][m] ≠ unmapped → vols1[v][m] = vols0[v][m])) ⊦ avhdr0 = empty, VTBL_VOLID ∈ vols0, VTBL_VOLID ∈ vols1, v0 × n2 ∈ q1
Used simplifier rules: lf-01: ⊦ m < n ∧ n = n0 → m < n0; (forward) from specification nat-basic