| m < # apebs, valid-eraseq-stronger(subarray(apebs, 0, m), q) ⊦ valid-eraseq-stronger(subarray(apebs, 0, m + 1), q + eq-entry(m, none) ') ↔ ¬ valid-peb(apebs[m]) |
m < # apebs, valid-eraseq-stronger(subarray(apebs, 0, m), q) ⊦ valid-eraseq-stronger(subarray(apebs, 0, m + 1), q + eq-entry(m, none) ') ↔ ¬ valid-peb(apebs[m])
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic