| apebs[n] = mkpeb(empty, avhdr, buf, m, false), aehdr.valid?, n < # apebs, ubi-io-inv(apebs) ⊦ ⟪aubi_io_write_echdr#(n, aehdr; apebs; err)⟫ ubi-io-inv(apebs) |
apebs[n] = mkpeb(empty, avhdr, buf, m, false), 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⟫ ubi-io-inv(apebs)
Used simplifier rules: write-echdr: ⊦ ;