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