| # apebs0 = # wlar, # buf0 = vtblpnum5 + n5, LEB_SIZE = (n + n2) + vtblpnum5, apebs0[n4] = mkpeb(aehdr, avhdr, buf2, m0, false), wlar[n4] = wl-entry(m1, used), avols[v][vtblpnum3] = mapped(buf2, m), vols[v][vtblpnum3] = ⌜n4⌝ , buf = buf3, n0 = n5, n1 = n3, vtblpnum = vtblpnum5, vtblpnum0 = vtblpnum3, avhdr.valid?, aehdr.valid?, n4 < # wlar, n2 < n5, vtblpnum3 < # avols[v], vtblpnum3 < # vols[v], abs(avols, apebs0, vols, q), bflipset-cons(bflipset, wlar), ebm-cons(avols), is-aligned(n2, EB_PAGE_SIZE), is-aligned(n5, EB_PAGE_SIZE), is-aligned(vtblpnum5, EB_PAGE_SIZE), range=(buf0, vtblpnum5, mkbuf(vtblpnum5 + n5), vtblpnum5, n5), ubi-io-inv(apebs0[n4, mkpeb(aehdr, avhdr, subarray(buf2, 0, vtblpnum5) + subarray(buf3, n3, n2) + mkempbuf(n), vtblpnum5 + n2, false)]), ubi-io-inv(apebs0), ubi-io-peb-inv(mkpeb(aehdr, avhdr, buf2, m0, false)), unique-sqns(apebs0[n4, mkpeb(aehdr, avhdr, subarray(buf2, 0, vtblpnum5) + subarray(buf3, n3, n2) + mkempbuf(n), vtblpnum5 + n2, false)]), unique-sqns(apebs0), valid-ebatbl (apebs0[n4, mkpeb(aehdr, avhdr, subarray(buf2, 0, vtblpnum5) + subarray(buf3, n3, n2) + mkempbuf(n), vtblpnum5 + n2, false)], wlar, vols, vtblpnum4), valid-ebatbl(apebs0, wlar, vols, vtblpnum4), valid-eraseq(apebs0[n4, mkpeb(aehdr, avhdr, subarray(buf2, 0, vtblpnum5) + subarray(buf3, n3, n2) + mkempbuf(n), vtblpnum5 + n2, false)], q), valid-eraseq(apebs0, q), valid-eraseq(wlar, q), valid-eraseq(q), valid-global-sqn(apebs0[n4, mkpeb(aehdr, avhdr, subarray(buf2, 0, vtblpnum5) + subarray(buf3, n3, n2) + mkempbuf(n), vtblpnum5 + n2, false)], sqnum), valid-global-sqn(apebs0, sqnum), valid-vtbl(apebs0, vols, wlar, vtblpnum4), valid-wl(apebs0[n4, mkpeb(aehdr, avhdr, subarray(buf2, 0, vtblpnum5) + subarray(buf3, n3, n2) + mkempbuf(n), vtblpnum5 + n2, false)], wlar), valid-wl(apebs0, wlar), v ∈ avols, v ∈ vols, n3 + n2 ≤ # buf3, vtblpnum5 ≤ LEB_SIZE, m0 ≤ LEB_SIZE, m ≤ LEB_SIZE, n2 + vtblpnum5 ≤ LEB_SIZE, m0 ≤ vtblpnum5, m ≤ vtblpnum5, n5 + n3 ≤ # buf3, n3 + n5 ≤ # buf3, vtblpnum5 + n5 ≤ LEB_SIZE, ⌊err3⌋ , ⌊err0⌋ ⊦ ⟨fail_or_success#(; ; err); if err = ESUCCESS then if avols[v][vtblpnum0].mapped? then if n0 ≠ 0 then avols[v][vtblpnum0] := mapped (subarray(avols[v][vtblpnum0].data, 0, vtblpnum) + subarray(buf, n1, n0) + mkempbuf(LEB_SIZE - vtblpnum - n0), vtblpnum + n0) else avols[v][vtblpnum0] := mapped(mkempbuf(vtblpnum) + subarray(buf, n1, n0) + mkempbuf(LEB_SIZE - vtblpnum - n0), vtblpnum + n0) else if avols[v][vtblpnum0].mapped? then choose n with n < n0 ∧ is-aligned(n, EB_PAGE_SIZE) in if n ≠ 0 then avols[v][vtblpnum0] := mapped (subarray(avols[v][vtblpnum0].data, 0, vtblpnum) + subarray(buf, n1, n) + mkempbuf(LEB_SIZE - vtblpnum - n), vtblpnum + n) ifnone skip else if n0 ≠ 0 then avols[v][vtblpnum0] := unmapped⟩ ( abs (avols, apebs0 [vols[v][vtblpnum3].pnum, mkpeb(aehdr, avhdr, subarray(buf2, 0, vtblpnum5) + subarray(buf3, n3, n2) + mkempbuf(n), vtblpnum5 + n2, false) ], vols, q) ∧ err0 = err), n2 = 0, vtblpnum4 = n4, VTBL_VOLID ∈ vols |
# apebs0 = # wlar, # buf0 = vtblpnum5 + n5, LEB_SIZE = (n + n2) + vtblpnum5, apebs0[n4] = mkpeb(aehdr, avhdr, buf2, m0, false), wlar[n4] = wl-entry(m1, used), avols[v][vtblpnum3] = mapped(buf2, m), vols[v][vtblpnum3] = ⌜n4⌝ , n2 ≠ 0, vtblpnum4 ≠ n4, avhdr.valid?, aehdr.valid?, n2 < n5, vtblpnum3 < # avols[v], vtblpnum3 < # vols[v], n4 < # wlar, abs(avols, apebs0, vols, q), bflipset-cons(bflipset, wlar), ebm-cons(avols), is-aligned(n2, EB_PAGE_SIZE), is-aligned(n5, EB_PAGE_SIZE), is-aligned(vtblpnum5, EB_PAGE_SIZE), range=(buf0, vtblpnum5, mkbuf(vtblpnum5 + n5), vtblpnum5, n5), ubi-io-inv(apebs0[n4, mkpeb(aehdr, avhdr, subarray(buf2, 0, vtblpnum5) + subarray(buf3, n3, n2) + mkempbuf(n), vtblpnum5 + n2, false)]), ubi-io-inv(apebs0), ubi-io-peb-inv(mkpeb(aehdr, avhdr, buf2, m0, false)), unique-sqns(apebs0[n4, mkpeb(aehdr, avhdr, subarray(buf2, 0, vtblpnum5) + subarray(buf3, n3, n2) + mkempbuf(n), vtblpnum5 + n2, false)]), unique-sqns(apebs0), valid-ebatbl (apebs0[n4, mkpeb(aehdr, avhdr, subarray(buf2, 0, vtblpnum5) + subarray(buf3, n3, n2) + mkempbuf(n), vtblpnum5 + n2, false)], wlar, vols, vtblpnum4), valid-ebatbl(apebs0, wlar, vols, vtblpnum4), valid-eraseq(apebs0[n4, mkpeb(aehdr, avhdr, subarray(buf2, 0, vtblpnum5) + subarray(buf3, n3, n2) + mkempbuf(n), vtblpnum5 + n2, false)], q), valid-eraseq(apebs0, q), valid-eraseq(wlar, q), valid-eraseq(q), valid-global-sqn(apebs0[n4, mkpeb(aehdr, avhdr, subarray(buf2, 0, vtblpnum5) + subarray(buf3, n3, n2) + mkempbuf(n), vtblpnum5 + n2, false)], sqnum), valid-global-sqn(apebs0, sqnum), valid-vtbl(apebs0, vols, wlar, vtblpnum4), valid-wl(apebs0[n4, mkpeb(aehdr, avhdr, subarray(buf2, 0, vtblpnum5) + subarray(buf3, n3, n2) + mkempbuf(n), vtblpnum5 + n2, false)], wlar), valid-wl(apebs0, wlar), v ∈ avols, v ∈ vols, n3 + n2 ≤ # buf3, vtblpnum5 ≤ LEB_SIZE, m0 ≤ LEB_SIZE, m ≤ LEB_SIZE, n2 + vtblpnum5 ≤ LEB_SIZE, m0 ≤ vtblpnum5, m ≤ vtblpnum5, n5 + n3 ≤ # buf3, n3 + n5 ≤ # buf3, vtblpnum5 + n5 ≤ LEB_SIZE, ⌊err3⌋ , ⌊err0⌋ , ¬ VTBL_VOLID ∈ vols ⊦ ⟨fail_or_success#(; ; err); if err = ESUCCESS then if avols[v][vtblpnum3].mapped? then if n5 ≠ 0 then avols[v][vtblpnum3] := mapped (subarray(avols[v][vtblpnum3].data, 0, vtblpnum5) + subarray(buf3, n3, n5) + mkempbuf(LEB_SIZE - vtblpnum5 - n5), vtblpnum5 + n5) else avols[v][vtblpnum3] := mapped(mkempbuf(vtblpnum5) + subarray(buf3, n3, n5) + mkempbuf(LEB_SIZE - vtblpnum5 - n5), vtblpnum5 + n5) else if avols[v][vtblpnum3].mapped? then {vtblpnum0 := vtblpnum3; vtblpnum := vtblpnum5; n1 := n3; buf := buf3; choose n with n < n5 ∧ is-aligned(n, EB_PAGE_SIZE) in if n ≠ 0 then avols[v][vtblpnum0] := mapped (subarray(avols[v][vtblpnum0].data, 0, vtblpnum) + subarray(buf, n1, n) + mkempbuf(LEB_SIZE - vtblpnum - n), vtblpnum + n) ifnone skip} else if n5 ≠ 0 then avols[v][vtblpnum3] := unmapped⟩ ( abs (avols, apebs0 [vols[v][vtblpnum3].pnum, mkpeb(aehdr, avhdr, subarray(buf2, 0, vtblpnum5) + subarray(buf3, n3, n2) + mkempbuf(n), vtblpnum5 + n2, false) ], vols, q) ∧ err0 = err)
Used simplifier rules: lf-mapped-in-apebs: ⊦ v ∈ vols ∧ m < # vols[v] ∧ vols[v][m] = ⌜n⌝ ∧ valid-ebatbl(apebs, wlar, vols, n0) → n < # apebs;% ⊦ # apebs[n, apeb] = # apebs; (s)