| # lpt = # avol, avol[m3] = mapped(buf), m3 < # avol, awbuf-inv(avol, bleb), synced(avol) ⊦ ⟪fail_or_success#(; ; err); if err = ESUCCESS then nx := nx + m3 ', bleb := buffered(m3)⟫ awbuf-inv(avol, bleb) |
# lpt = # avol, avol[m3] = mapped(buf), m3 < # avol, awbuf-inv(avol, bleb), synced(avol) ⊦ ⟪choose err0 with ⌊err0⌋ ∨ err0 = ESUCCESS in err := err0; if err = ESUCCESS then nx := nx + m3 ', bleb := buffered(m3)⟫ awbuf-inv(avol, bleb)
Used simplifier rules: fail_or_success#(; ; ERR) {choose ERR0 with ⌊ERR0⌋ ∨ ERR0 = ESUCCESS in ERR := ERR0};