| n0 < # apebs, ubi-io-initial(apebs), valid-peb(v, m, apebs[n0]), ∀ apebs, v, m. ubi-io-initial(apebs) ∧ n0 ≤ # apebs → valid-sqns(v, m, apebs, n0) = ∅ ⊦ valid-sqns(v, m, apebs, n0) ∪ {apebs[n0].vidhdr.sqn} = ∅ |
n0 < # apebs, ubi-io-initial(apebs), valid-peb(v, m, apebs[n0]), ∀ apebs, v, m. ubi-io-initial(apebs) ∧ n0 ≤ # apebs → valid-sqns(v, m, apebs, n0) = ∅ ⊦
Used simplifier rules: ⊦ ∅ ≠ bag ++ n; (s)%union-com: ⊦ bag ∪ bag2 = bag2 ∪ bag; from specification bag-union[nat-bag]%union-ass: ⊦ bag ∪ bag3 ∪ bag4 = (bag ∪ bag3) ∪ bag4; from specification bag-union[nat-bag]% ⊦ bag ∪ {n} = bag ++ n; (s)