| n < # apebs, valid-peb(v, m, apebs[n]) ⊦ ∃ bag. valid-sqns(v, m, apebs) = bag ++ apebs[n].vidhdr.sqn |
n < # apebs, valid-peb(v, m, apebs[n]) ⊦ ∃ bag. valid-sqns(v, m, apebs, # apebs) = bag ++ apebs[n].vidhdr.sqn
Used simplifier rules: valid-sqns: ⊦ valid-sqns(v, m, apebs) = valid-sqns(v, m, apebs, # apebs);% ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic