| # lpt = # avol, adr = adr3, adr0 = adr1, adr2 = adr3, lpt0 = lpt1, lpt2 = lpt, m = m3, m0 = m1, m2 = m3, ns = ns3, ns0 = ns1, ns2 = ns3, plog = plog0, plog1 = plog0, ebm-vol-inv(avol), avol ⊆ 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 := ?⟩ (adr2 = adr ∧ m2 = m ∧ plog1 = plog ∧ lpt2 = lpt ∧ avol ⊆ avol0 ∧ ns2 = ns) |
# lpt = # avol, adr = adr3, adr0 = adr1, adr2 = adr3, lpt0 = lpt1, lpt2 = lpt, m = m3, m0 = m1, m2 = m3, ns = ns3, ns0 = ns1, ns2 = ns3, plog = plog0, plog1 = plog0, ebm-vol-inv(avol), avol ⊆ 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 := ?⟩ (adr2 = adr ∧ m2 = m ∧ plog1 = plog ∧ lpt2 = lpt ∧ avol ⊆ avol0 ∧ ns2 = ns)
Used simplifier rules: fail_or_success#(; ; ERR) {choose ERR0 with ⌊ERR0⌋ ∨ ERR0 = ESUCCESS in ERR := ERR0};