| apebs[n] = mkpeb(aehdr, avhdr, buf, m, false), n < # apebs, ubi-io-inv(apebs) ⊦ ⟨fail_or_success#(; ; err); apebs0 := apebs; if err = ESUCCESS then apebs[n] := mkpeb(empty, empty, mkempbuf(LEB_SIZE), 0, false) else {choose apeb with ubi-io-peb-inv(apeb) ∧ ¬ apeb.bad ∧ ¬ apeb.vidhdr.valid? in apebs[n] := apeb or skip}⟩ (apebs0 = apebs) |
apebs[n] = mkpeb(aehdr, avhdr, buf, m, false), n < # apebs, ubi-io-inv(apebs) ⊦ ⟨choose err0 with ⌊err0⌋ ∨ err0 = ESUCCESS in err := err0; apebs0 := apebs; if err = ESUCCESS then apebs[n] := mkpeb(empty, empty, mkempbuf(LEB_SIZE), 0, false) else {choose apeb with ubi-io-peb-inv(apeb) ∧ ¬ apeb.bad ∧ ¬ apeb.vidhdr.valid? in apebs[n] := apeb or skip}⟩ (apebs0 = apebs)
Used simplifier rules: fail_or_success#(; ; ERR) {choose ERR0 with ⌊ERR0⌋ ∨ ERR0 = ESUCCESS in ERR := ERR0};