| # avol0 = # avol1, # lpt0 = # avol1, # buf0 = EB_PAGE_SIZE, rofs ↔ false, avol0[m5] = mapped(buf), adr = adr0, avol = avol1, lpt = lpt0, m = m2, m0 = # mapped(buf).data, m1 = m5, ns = ns0, plog = plog0, plog1 = plog0, mapped(buf).mapped?, m5 < # avol1, abs(avol1, bleb, mkwbuf(buf0, m4, m3), avol0, false), awbuf-inv(avol1, bleb), ebm-vol-inv(avol0), synced(avol1), bleb ≠ nobuffer → bleb.leb < # avol1 ∧ wbuf-cons(mkwbuf(buf0, m4, m3), avol0[bleb.leb], false), bleb = nobuffer ∨ m3 = 0 ⊦ ⟨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⟩ (abs(avol1, buffered(m5), mkwbuf(buf0, # avol1[m5].data, 0), avol0, false) ∧ bleb = buffered(m5) ∧ plog = plog1 + m5 ' ∧ ESUCCESS = err), bleb = buffered(m5) |
# buf0 = EB_PAGE_SIZE, # lpt0 = # avol1, # avol0 = # avol1, rofs ↔ false, avol0[m5] = mapped(buf), adr = adr0, avol = avol1, lpt = lpt0, m = m2, m0 = # mapped(buf).data, m1 = m5, ns = ns0, plog = plog0, plog1 = plog0, mapped(buf).mapped?, m5 < # avol1, abs(avol1, bleb, mkwbuf(buf0, m4, m3), avol0, false), awbuf-inv(avol1, bleb), ebm-vol-inv(avol0), synced(avol1), bleb ≠ nobuffer → bleb.leb < # avol1 ∧ wbuf-cons(mkwbuf(buf0, m4, m3), avol0[bleb.leb], false), bleb = nobuffer ∨ m3 = 0 ⊦ ⟨fail_or_success#(; ; err); if err = ESUCCESS then plog := plog + m1, bleb := buffered(m1)⟩ (abs(avol1, buffered(m5), mkwbuf(buf0, # avol1[m5].data, 0), avol0, false) ∧ bleb = buffered(m5) ∧ plog = plog1 + m5 ' ∧ ESUCCESS = err), bleb = buffered(m5)
Used simplifier rules: abs-unbuffered: n < # avol0 ⊦ abs(avol0, bleb, wbuf, avol1, rofs) ∧ avol1[n] = mapped(buf) ∧ bleb ≠ buffered(n) → avol0[n] = mapped(buf);% ⊦ m < n ↔ ¬ n ≤ m; (ss)% ⊦ m < n → (n ≤ m ↔ false); (s)% ⊦ mapped(buf).mapped?; (s)% ⊦ mapped(buf).data = buf; (s)