| # buf = EB_PAGE_SIZE, # lpt = # avol, wbuf = mkwbuf(buf, m1, m2), ebm-vol-inv(avol), bleb ≠ nobuffer → bleb.leb < # avol ∧ wbuf-cons(wbuf, avol[bleb.leb], false), bleb = buffered(m3) ∨ (bleb = nobuffer ∨ m2 = 0) ∧ m3 < # avol ∧ avol[m3].mapped? ∧ m0 = # avol[m3].data ⊦ ⟪apersistence_io_add_log_leb#(m3, adr, m, avol, lpt, ns; plog; err); rofs := false; if err = ESUCCESS then wbuf_move_buf#(m3, m0, rofs, avol; bleb, wbuf; err)⟫ (# wbuf.content = EB_PAGE_SIZE ∧ (bleb ≠ nobuffer → bleb.leb < # avol ∧ wbuf-cons(wbuf, avol[bleb.leb], rofs))) |
# lpt = # avol, # buf = EB_PAGE_SIZE, ebm-vol-inv(avol), bleb ≠ nobuffer → bleb.leb < # avol ∧ wbuf-cons(mkwbuf(buf, m1, m2), avol[bleb.leb], false), bleb = buffered(m3) ∨ (bleb = nobuffer ∨ m2 = 0) ∧ m3 < # avol ∧ avol[m3].mapped? ∧ m0 = # avol[m3].data ⊦ ⟪apersistence_io_add_log_leb#(m3, adr, m, avol, lpt, ns; plog; err); rofs := false; wbuf := mkwbuf(buf, m1, m2); if err = ESUCCESS then wbuf_move_buf#(m3, m0, rofs, avol; bleb, wbuf; err)⟫ (# wbuf.content = EB_PAGE_SIZE ∧ (bleb ≠ nobuffer → bleb.leb < # avol ∧ wbuf-cons(wbuf, avol[bleb.leb], rofs)))