| apebs[m1] = mkpeb(aehdr, avhdr, buf, m0, boolvar), valid-sqns(v, m, apebs[n, apeb], m1) = (n < m1 ⊃ (valid-sqns(v, m, apebs, m1) \ (valid-peb(v, m, apebs[n]) ⊃ {apebs[n].vidhdr.sqn} ;∅)) ∪ (valid-peb(v, m, apeb) ⊃ {apeb.vidhdr.sqn} ;∅) ;valid-sqns(v, m, apebs, m1) ), m1 < # apebs, valid-peb(v, m, apebs[m1]) ⊦ valid-sqns(v, m, apebs[n, apeb], m1) ++ avhdr.sqn = (¬ m1 < n ⊃ ((valid-sqns(v, m, apebs, m1) ++ avhdr.sqn) \ (valid-peb(v, m, apebs[n]) ⊃ {apebs[n].vidhdr.sqn} ;∅)) ∪ (valid-peb(v, m, apeb) ⊃ {apeb.vidhdr.sqn} ;∅) ;valid-sqns(v, m, apebs, m1) ++ avhdr.sqn ), m1 = n |
apebs[m1] = mkpeb(aehdr, avhdr, buf, m0, boolvar), valid-sqns(v, m, apebs[n, apeb], m1) = (n < m1 ⊃ (valid-sqns(v, m, apebs, m1) \ (valid-peb(v, m, apebs[n]) ⊃ {apebs[n].vidhdr.sqn} ;∅)) ∪ (valid-peb(v, m, apeb) ⊃ {apeb.vidhdr.sqn} ;∅) ;valid-sqns(v, m, apebs, m1) ), m1 < # apebs, valid-peb(v, m, mkpeb(aehdr, avhdr, buf, m0, boolvar)) ⊦ valid-sqns(v, m, apebs[n, apeb], m1) ++ avhdr.sqn = (¬ m1 < n ⊃ ((valid-sqns(v, m, apebs, m1) ++ avhdr.sqn) \ (valid-peb(v, m, apebs[n]) ⊃ {apebs[n].vidhdr.sqn} ;∅)) ∪ (valid-peb(v, m, apeb) ⊃ {apeb.vidhdr.sqn} ;∅) ;valid-sqns(v, m, apebs, m1) ++ avhdr.sqn ), m1 = n