| # lpt2 = # avol1, adr0 = adr1, avol = avol0, lpt = lpt2, lpt0 = lpt1, m0 = m1, ns0 = ns1, ebm-vol-inv(avol1), avol1 ⊆ avol0 ⊦ ⟪fail_or_success#(; ; err); if err = ESUCCESS then adr0 := adr, m0 := m, log := plog, lpt0 := lpt, ns0 := ns else avol := ?, adr := ?, m := ?, plog := ?, lpt := ?, adr0 := ?, m0 := ?, log := ?, lpt0 := ?, ns0 := ?, ns := ?⟫ (err = ESUCCESS → ebm-vol-inv(avol) ∧ # lpt = # avol) |
# lpt2 = # avol1, adr0 = adr1, avol = avol0, lpt = lpt2, lpt0 = lpt1, m0 = m1, ns0 = ns1, ebm-vol-inv(avol1), avol1 ⊆ avol0 ⊦ ⟪choose err0 with ⌊err0⌋ ∨ err0 = ESUCCESS in err := err0; if err = ESUCCESS then adr0 := adr, m0 := m, log := plog, lpt0 := lpt, ns0 := ns else avol := ?, adr := ?, m := ?, plog := ?, lpt := ?, adr0 := ?, m0 := ?, log := ?, lpt0 := ?, ns0 := ?, ns := ?⟫ (err = ESUCCESS → ebm-vol-inv(avol) ∧ # lpt = # avol)
Used simplifier rules: fail_or_success#(; ; ERR) {choose ERR0 with ⌊ERR0⌋ ∨ ERR0 = ESUCCESS in ERR := ERR0};