| avols = avols0, ebm-cons(avols0), ebm-cons(avols1), ebm-vol-inv(abs(avols1[default-volid])), default-volid ∈ avols1, avols1 ⊆ avols0 ⊦ ⟪ebm_recover#(; avols; err); v := default-volid⟫ ( (err = ESUCCESS → (∃ avol. abs(avols1[default-volid]) ⊆ avol ∧ ⟨ebm_avol_recover#(; avol; err0)⟩ (avol = abs(avols[v]) ∧ ESUCCESS = err0))) ∧ (err ≠ ESUCCESS → (∀ avol. ⟨ebm_avol_recover#(; avol1; err0)⟩ (avol = avol1 ∧ err = err0)))) |
avols = avols0, ebm-cons(avols1), ebm-cons(avols0), ebm-vol-inv(abs(avols1[default-volid])), default-volid ∈ avols1, avols1 ⊆ avols0 ⊦ ⟪fail_or_success#(; ; err); if err ≠ ESUCCESS then avols := ?; v := default-volid⟫ ( (err = ESUCCESS → (∃ avol. abs(avols1[default-volid]) ⊆ avol ∧ ⟨ebm_avol_recover#(; avol; err0)⟩ (avol = abs(avols[v]) ∧ ESUCCESS = err0))) ∧ (err ≠ ESUCCESS → (∀ avol. ⟨ebm_avol_recover#(; avol1; err0)⟩ (avol = avol1 ∧ err = err0))))
Used simplifier rules: ebm_recover#(; AVOLS; ERR) {fail_or_success#(; ; ERR); if ERR ≠ ESUCCESS then AVOLS := ?};