| # apebs = n1 + vtblpnum1, # wlar0 = n1 + vtblpnum1, apebs[vtblpnum1] = mkpeb(aechdr(m), avidhdr(v, m1, m2, m3, m4), buf1, m0, false), valid-sqns(v, m1, apebs, vtblpnum1) = ∅, nx < vtblpnum1, vtblpnum1 < # apebs, bflipset-cons(bflipset, subarray(wlar0, 0, vtblpnum1)), indices-erasing(wlar0, nx), ubi-io-inv(apebs), ubi-io-peb-inv(mkpeb(aechdr(m), avidhdr(v, m1, m2, m3, m4), buf1, m0, false)), unique-sqns(apebs), valid-eraseq(subarray(wlar0, 0, vtblpnum1), q), valid-eraseq-stronger(subarray(apebs, 0, vtblpnum1), q), valid-global-sqn(subarray(apebs, 0, vtblpnum1), sqnum), valid-recs(subarray(apebs, 0, vtblpnum1), subarray(wlar0, 0, vtblpnum1), recs), valid-recs-sqns(apebs, recs), valid-wl(subarray(apebs, 0, vtblpnum1), subarray(wlar0, 0, vtblpnum1)) ⊦ m3 = 0, n1 = 0, dups(nx), valid-peb(v, m1, mkpeb(aechdr(m), avidhdr(v, m1, m2, m3, m4), buf1, m0, false)), v × m1 ∈ recs, valid-global-sqn(subarray(apebs, 0, vtblpnum1 + 1), sqnum) ∧ ¬ valid-peb(apebs[vtblpnum1]) ∧ valid-wl(subarray(apebs, 0, vtblpnum1 + 1), subarray(wlar0[vtblpnum1, wl-entry(m, erasing)], 0, vtblpnum1 + 1)), m3 ≤ datasize(buf1) ∧ m4 = checksum(buf1, m3) |
# apebs = n1 + vtblpnum1, # wlar0 = n1 + vtblpnum1, apebs[vtblpnum1] = mkpeb(aechdr(m), avidhdr(v, m1, m2, m3, m4), buf1, m0, false), valid-sqns(v, m1, apebs, vtblpnum1) = ∅, nx < vtblpnum1, bflipset-cons(bflipset, subarray(wlar0, 0, vtblpnum1)), indices-erasing(wlar0, nx), ubi-io-inv(apebs), ubi-io-peb-inv(mkpeb(aechdr(m), avidhdr(v, m1, m2, m3, m4), buf1, m0, false)), unique-sqns(apebs), valid-eraseq(subarray(wlar0, 0, vtblpnum1), q), valid-eraseq-stronger(subarray(apebs, 0, vtblpnum1), q), valid-global-sqn(subarray(apebs, 0, vtblpnum1), sqnum), valid-recs(subarray(apebs, 0, vtblpnum1), subarray(wlar0, 0, vtblpnum1), recs), valid-recs-sqns(apebs, recs), valid-wl(subarray(apebs, 0, vtblpnum1), subarray(wlar0, 0, vtblpnum1)) ⊦ m3 = 0, n1 = 0, dups(nx), valid-peb(v, m1, mkpeb(aechdr(m), avidhdr(v, m1, m2, m3, m4), buf1, m0, false)), v × m1 ∈ recs, m3 ≤ datasize(buf1) ∧ m4 = checksum(buf1, m3), valid-wl(subarray(apebs, 0, vtblpnum1 + 1), subarray(wlar0[vtblpnum1, wl-entry(m, erasing)], 0, vtblpnum1 + 1)) ∧ valid-global-sqn(subarray(apebs, 0, vtblpnum1 + 1), sqnum)
Used simplifier rules: ⊦ valid-peb (mkpeb(aehdr, avidhdr(v, m, n, n0, n2), buf, n1, boolvar)) ↔ valid-peb (v, m, mkpeb(aehdr, avidhdr(v, m, n, n0, n2), buf, n1, boolvar)); (ss)% ⊦ avidhdr(v, m, m0, m1, m2).leb = m; (s)% ⊦ avidhdr(v, m, m0, m1, m2).vol = v; (s)% ⊦ mkpeb(aehdr, avhdr, buf, m, boolvar).vidhdr = avhdr; (s)%⊦ valid-peb(apeb) → (valid-peb(v, m, apeb) ↔ v = apeb.vidhdr.vol ∧ m = apeb.vidhdr.leb); (ss)%c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic% ⊦ m < m + n ↔ n ≠ 0; (s)