| ⊦ ⟪fail_or_success#(; ; err); lpt0 := lpt; if err = ESUCCESS then {avol := fill(mkavolume(# lpt), unmapped); adr := adr0; m := m0; nx := []; lpt := lpt0; ns := ∅; bleb := nobuffer; isbuf := false} else avol := ?, bleb := ?, isbuf := ?, adr := ?, m := ?, nx := ?, lpt := ?, ns := ?⟫ (err = ESUCCESS → synced(avol) ∧ awbuf-inv(avol, bleb) ∧ # lpt = # avol) |
⊦ ⟪choose err0 with ⌊err0⌋ ∨ err0 = ESUCCESS in err := err0; lpt0 := lpt; if err = ESUCCESS then {avol := fill(mkavolume(# lpt), unmapped); adr := adr0; m := m0; nx := []; lpt := lpt0; ns := ∅; bleb := nobuffer; isbuf := false} else avol := ?, bleb := ?, isbuf := ?, adr := ?, m := ?, nx := ?, lpt := ?, ns := ?⟫ (err = ESUCCESS → synced(avol) ∧ awbuf-inv(avol, bleb) ∧ # lpt = # avol)
Used simplifier rules: fail_or_success#(; ; ERR) {choose ERR0 with ⌊ERR0⌋ ∨ ERR0 = ESUCCESS in ERR := ERR0};