| # lpt2 = # avol1, # avol0 = # avol1, # lpt1 = # avol1, # buf = EB_PAGE_SIZE, adr = adr3, adr0 = adr2, avol = avol0, lpt = lpt1, lpt0 = lpt2, m = m5, m0 = m3, ns = ns4, ns0 = ns2, plog = plog0, abs(avol1, bleb, mkwbuf(buf, m1, m2), avol0, rofs), awbuf-inv(avol1, bleb), ebm-vol-inv(avol0), synced(avol1), bleb ≠ nobuffer → bleb.leb < # avol1 ∧ wbuf-cons(mkwbuf(buf, m1, m2), avol0[bleb.leb], rofs) ⊦ ⟪if # lpt0 = # avol then {fail_or_success#(; ; err); if err = ESUCCESS then {adr := adr0; m := m0; plog := []; lpt := lpt0; ns := ns0}; ns0 := ?} else abort; rofs0 := rofs; if err ≠ ESUCCESS then rofs := true⟫ ⟨awbuf_commit#(lpt2, adr2, m3, avol1, bleb; ns2, adr3, m5, plog0, lpt1, ns4, rofs0; err0)⟩ ( abs(avol1, bleb, mkwbuf(buf, m1, m2), avol0, rofs) ∧ adr3 = adr ∧ m5 = m ∧ plog0 = plog ∧ lpt1 = lpt ∧ ns4 = ns ∧ (rofs0 ↔ rofs) ∧ ns0 = ns2 ∧ err = err0) |
# buf = EB_PAGE_SIZE, # lpt1 = # avol1, # avol0 = # avol1, # lpt2 = # avol1, adr = adr3, adr0 = adr2, avol = avol0, lpt = lpt1, lpt0 = lpt2, m = m5, m0 = m3, ns = ns4, ns0 = ns2, plog = plog0, abs(avol1, bleb, mkwbuf(buf, m1, m2), avol0, rofs), awbuf-inv(avol1, bleb), ebm-vol-inv(avol0), synced(avol1), bleb ≠ nobuffer → bleb.leb < # avol1 ∧ wbuf-cons(mkwbuf(buf, m1, m2), avol0[bleb.leb], rofs) ⊦ ⟪fail_or_success#(; ; err); if err = ESUCCESS then {adr := adr0; m := m0; plog := []; lpt := lpt0; ns := ns0}; ns0 := ?; rofs0 := rofs; if err ≠ ESUCCESS then rofs := true⟫ ⟨awbuf_commit#(lpt2, adr2, m3, avol1, bleb; ns2, adr3, m5, plog0, lpt1, ns4, rofs0; err0)⟩ ( abs(avol1, bleb, mkwbuf(buf, m1, m2), avol0, rofs) ∧ adr3 = adr ∧ m5 = m ∧ plog0 = plog ∧ lpt1 = lpt ∧ ns4 = ns ∧ (rofs0 ↔ rofs) ∧ ns0 = ns2 ∧ err = err0)