| wlar[n] = wl-entry(m, free), n < # wlar, valid-eraseq(wlar, q), n ∈ q ⊦ |
wlar[n] = wl-entry(m, free), n < # wlar, n ∈ q, ∀ n. n ∈ q ↔ n < # wlar ∧ wlar[n].status = erasing ⊦
Used simplifier rules: valid-eraseqw: ⊦ valid-eraseq(wlar, q) ↔ (∀ n. n ∈ q ↔ n < # wlar ∧ wlar[n].status = erasing);% ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic