| m1 < # apebs, n < # apebs, valid-peb(v, m, apebs[n]), n ≤ m1, n < m1 ∧ n < # apebs ∧ valid-peb(v, m, apebs[n]) ∧ m1 ≤ # apebs → (∃ bag. valid-sqns(v, m, apebs, m1) = bag ++ apebs[n].vidhdr.sqn) ⊦ ∃ bag. valid-sqns(v, m, apebs, m1) ∪ (valid-peb(v, m, apebs[m1]) ⊃ {apebs[m1].vidhdr.sqn} ;∅) = bag ++ apebs[n].vidhdr.sqn |
n < # apebs, m1 < # apebs, valid-peb(v, m, apebs[n]), n ≤ m1, n < m1 → valid-sqns(v, m, apebs, m1) = bag ++ apebs[n].vidhdr.sqn ⊦ ∃ bag. valid-sqns(v, m, apebs, m1) ∪ (valid-peb(v, m, apebs[m1]) ⊃ {apebs[m1].vidhdr.sqn} ;∅) = bag ++ apebs[n].vidhdr.sqn
Used simplifier rules: ⊦ m < n → m ≤ n; (s)%⊦ valid-peb(v0, m0, apeb) → (valid-peb(v1, m1, apeb) ↔ v0 = v1 ∧ m0 = m1); (s)