| # avol0 = # avol1, # lpt0 = # avol1, # buf0 = EB_PAGE_SIZE, avol1[m5] = mapped(buf), bleb0 = bleb, plog = plog0, m5 < # avol1, abs(avol1, bleb, mkwbuf(buf0, m4, m3), avol0, false), awbuf-inv(avol1, bleb), ebm-vol-inv(avol0), synced(avol1), ⌊err0⌋ , bleb ≠ nobuffer → bleb.leb < # avol1 ∧ wbuf-cons(mkwbuf(buf0, m4, m3), avol0[bleb.leb], false), bleb ≠ buffered(m5) → bleb = nobuffer ∨ m3 = 0 → avol0[m5].mapped?, bleb = buffered(m5) ∨ (bleb = nobuffer ∨ m3 = 0) ∧ avol0[m5].mapped? ∧ # buf = # avol0[m5].data ⊦ ⟨awbuf_add_log_leb#(m5, # avol1[m5].data, adr0, m2, avol1, lpt0, ns0, false; plog0, bleb0; err1)⟩ (bleb0 = bleb ∧ plog0 = plog ∧ err0 = err1) |
# buf0 = EB_PAGE_SIZE, # lpt0 = # avol1, # avol0 = # avol1, rofs ↔ false, avol1[m5] = mapped(buf), adr = adr0, avol = avol1, bleb = bleb0, bleb0 = bleb1, lpt = lpt0, m = m2, m0 = # avol1[m5].data, m1 = m5, ns = ns0, plog = plog0, plog1 = plog0, avol1[m5].mapped?, m5 < # avol1, abs(avol1, bleb1, mkwbuf(buf0, m4, m3), avol0, false), awbuf-inv(avol1, bleb1), ebm-vol-inv(avol0), synced(avol1), ⌊err0⌋ , bleb1 ≠ buffered(m5) → bleb1 = nobuffer ∨ m3 = 0 → avol0[m5].mapped?, bleb1 ≠ nobuffer → bleb1.leb < # avol1 ∧ wbuf-cons(mkwbuf(buf0, m4, m3), avol0[bleb1.leb], false), bleb1 = buffered(m5) ∨ (bleb1 = nobuffer ∨ m3 = 0) ∧ avol0[m5].mapped? ∧ # buf = # avol0[m5].data ⊦ ⟨if m1 < # avol ∧ avol[m1].mapped? ∧ m0 = # avol[m1].data ∧ synced(avol) then {fail_or_success#(; ; err); if err = ESUCCESS then plog := plog + m1, bleb := buffered(m1)} else abort⟩ (bleb = bleb1 ∧ plog = plog1 ∧ err0 = err)
Used simplifier rules: awbuf_add_log_leb# (LNUM, OFFSET, WROOTADR, WMAXINO, WVOL, WLPT, WORPHANS, AROFS ; WLOG, WBUFLEB ; ERR ) {if LNUM < # WVOL ∧ WVOL[LNUM].mapped? ∧ OFFSET = # WVOL[LNUM].data ∧ synced(WVOL) then {fail_or_success#(; ; ERR); if ERR = ESUCCESS then WLOG := WLOG + LNUM, WBUFLEB := buffered(LNUM)} else abort };% ⊦ aleb.mapped? ↔ aleb ≠ unmapped; (ss)% ⊦ unmapped ≠ mapped(buf); (s)