| # buf1 = EB_PAGE_SIZE, # lpt0 = # avol1, # avol0 = # avol1, avol0[m4] = mapped(buf2), adr = adr0, align↓(m2 + n3, EB_PAGE_SIZE) = n + m2, avol = avol0, buf = copy(buf3, 0, copy(buf1, 0, mkbuf(n + m2), 0, m2), m2, n), lpt = lpt0, m = m3, m0 = # buf2, m1 = buffered(m4).leb, n0 = n + m2, n1 = 0, ns = ns0, plog = plog0, buffered(m4).isbuf?, m2 < EB_PAGE_SIZE, m4 < # avol1, abs(avol1, buffered(m4), mkwbuf(buf1, # buf2, m2), avol0, false), awbuf-inv(avol1, buffered(m4)), ebm-vol-inv(avol0), is-aligned(# buf2, EB_PAGE_SIZE), n ≤ # buf3, # buf2 + m2 + n3 ≤ LEB_SIZE, EB_PAGE_SIZE ≤ m2 + n3, n3 ≤ # buf3, # avol1[m4].data + n3 ≤ LEB_SIZE, 0 + m2 ≤ # mkbuf(n + m2), 0 + m2 ≤ # buf1, m2 + n ≤ # copy(buf1, 0, mkbuf(n + m2), 0, m2), 0 + n ≤ # buf3, m1 < # avol → m1 < # avol ∧ (avol[m1].mapped? → avol[m1].mapped? ∧ m1 < # avol) ⊦ ⟪abort; wbuf := mkwbuf(buf1, # buf2, m2); rofs := false; if err = ESUCCESS then {wbuf.content := copy(buf3, n, wbuf.content, 0, (m2 + n3) % EB_PAGE_SIZE); wbuf.offset := wbuf.offset + align↓(m2 + n3, EB_PAGE_SIZE); wbuf.nbytes := (m2 + n3) % EB_PAGE_SIZE} else rofs := true⟫ ⟨rofs0 := false; awbuf_write_buf#(n3, buf3, adr0, m3, plog0, lpt0, ns0, buffered(m4); avol1, rofs0; err0)⟩ (abs(avol1, buffered(m4), wbuf, avol, rofs) ∧ (rofs0 ↔ rofs) ∧ err = err0), n3 = 0, m1 < # avol ∧ avol[m1].mapped? ∧ # avol[m1].data ≤ m0 ∧ is-aligned(m0, EB_PAGE_SIZE) ∧ is-aligned(n0, EB_PAGE_SIZE) ∧ m0 + n0 ≤ LEB_SIZE ∧ n1 + n0 ≤ # buf |
# avol0 = # avol1, # lpt0 = # avol1, # buf1 = EB_PAGE_SIZE, avol0[m4] = mapped(buf2), adr = adr0, align↓(m2 + n3, EB_PAGE_SIZE) = n + m2, avol = avol0, buf = copy(buf3, 0, copy(buf1, 0, mkbuf(n + m2), 0, m2), m2, n), lpt = lpt0, m = m3, m0 = # buf2, m1 = buffered(m4).leb, n0 = n + m2, n1 = 0, ns = ns0, plog = plog0, buffered(m4).isbuf?, m4 < # avol1, m2 < EB_PAGE_SIZE, abs(avol1, buffered(m4), mkwbuf(buf1, # buf2, m2), avol0, false), awbuf-inv(avol1, buffered(m4)), ebm-vol-inv(avol0), is-aligned(# buf2, EB_PAGE_SIZE), 0 + n ≤ # buf3, m2 + n ≤ # copy(buf1, 0, mkbuf(n + m2), 0, m2), 0 + m2 ≤ # buf1, 0 + m2 ≤ # mkbuf(n + m2), # avol1[m4].data + n3 ≤ LEB_SIZE, n3 ≤ # buf3, EB_PAGE_SIZE ≤ m2 + n3, # buf2 + m2 + n3 ≤ LEB_SIZE, n ≤ # buf3, m1 < # avol → m1 < # avol ∧ (avol[m1].mapped? → avol[m1].mapped? ∧ m1 < # avol) ⊦ n3 = 0, m1 < # avol ∧ avol[m1].mapped? ∧ # avol[m1].data ≤ m0 ∧ is-aligned(m0, EB_PAGE_SIZE) ∧ is-aligned(n0, EB_PAGE_SIZE) ∧ m0 + n0 ≤ LEB_SIZE ∧ n1 + n0 ≤ # buf