| # lpt = # avol, m = m1, m0 = m2, m2 < # avol, awbuf-inv(avol, bleb), synced(avol) ⊦ ⟪fail_or_success#(; ; err); if err = ESUCCESS then avol[m0] := mapped(mkbuf(0)) else {skip or avol[m0] := unmapped}⟫ (awbuf-inv(avol, bleb) ∧ # lpt = # avol), buffered(m2) = bleb |
# lpt = # avol, m = m1, m0 = m2, m2 < # avol, awbuf-inv(avol, bleb), synced(avol) ⊦ ⟪choose err0 with ⌊err0⌋ ∨ err0 = ESUCCESS in err := err0; if err = ESUCCESS then avol[m0] := mapped(mkbuf(0)) else {skip or avol[m0] := unmapped}⟫ (awbuf-inv(avol, bleb) ∧ # lpt = # avol), buffered(m2) = bleb
Used simplifier rules: fail_or_success#(; ; ERR) {choose ERR0 with ⌊ERR0⌋ ∨ ERR0 = ESUCCESS in ERR := ERR0};