| m < # apebs, # apebs = # wlar, m0 < m ⊦ valid-wl(subarray(apebs, 0, m), subarray(wlar, 0, m)) ∧ valid-peb(v, n, apebs[m]) ∧ valid-peb(v, n, apebs[m0]) ∧ apebs[m0].vidhdr.sqn = valid-sqns(v, n, apebs, m).max ∧ apebs[m].vidhdr.sqn > apebs[m0].vidhdr.sqn ∧ unique-sqns(apebs) ∧ apebs[m].echdr.ec = m2 → valid-wl(subarray(apebs, 0, m + 1), subarray(wlar[m, wl-entry(m2, used)][m0, wl-entry(m1, erasing)], 0, m + 1)) |