| apebs[n] = mkpeb(empty, avhdr, buf, m, false), apebs0 = apebs, aehdr.valid?, n < # apebs, ubi-io-inv(apebs) ⊦ ⟨aubi_io_write_echdr#(n, aehdr; apebs; err)⟩ (apebs0 = apebs) |
apebs[n] = mkpeb(empty, avhdr, buf, m, false), apebs0 = apebs, aehdr.valid?, n < # apebs, ubi-io-inv(apebs) ⊦ ⟨if ubi-io-write-echdr-pre(n, aehdr, apebs) then {fail_or_success#(; ; err); if err = ESUCCESS then apebs[n].echdr := aehdr else choose aehdr with ¬ aehdr.valid? in apebs[n].echdr := aehdr} else abort⟩ (apebs0 = apebs)
Used simplifier rules: write-echdr: ⊦ ;