| m < # apebs, abs(pebs, apebs), mtd-cons(pebs), ubi-io-inv(apebs), ⌊err0⌋ ⊦ ⟨if ubi-io-isbad-pre(m, apebs) then {fail_or_success#(; ; err); if err = ESUCCESS then isbad := apebs[m].bad else isbad := ?} else abort⟩ ((isbad1 ↔ isbad) ∧ err0 = err) |
m < # apebs, abs(pebs, apebs), mtd-cons(pebs), ubi-io-inv(apebs), ⌊err0⌋ ⊦ ⟨fail_or_success#(; ; err); if err = ESUCCESS then isbad := apebs[m].bad else isbad := ?⟩ ((isbad1 ↔ isbad) ∧ err0 = err)
Used simplifier rules: ⊦ ubi-io-isbad-pre(n, apebs) ↔ n < # apebs; (s)% ⊦ m < n ↔ ¬ n ≤ m; (ss)% ⊦ m < n → (n ≤ m ↔ false); (s)