| apebs[m2] = mkpeb(aehdr, empty, buf0, m1, false), pebs[m2] = mkpeb(buf1, EB_PAGE_SIZE, false), buf = mkbuf(EB_PAGE_SIZE), aehdr.valid?, m2 < # pebs, m2 < # apebs, abs(pebs, apebs), abs-peb(mkpeb(buf1, EB_PAGE_SIZE, false), mkpeb(aehdr, empty, buf0, m1, false)), mtd-cons(pebs), ubi-io-inv(apebs) ⊦ ∀ buf, err. (err = ESUCCESS ∨ ⌊err⌋ ) ∧ # buf = EB_PAGE_SIZE ∧ (err = ESUCCESS → is-encoded(vidhdr(v, m, m0, m3, m4), buf)) → ⟪if err = ESUCCESS then mtd_asm_write#(m2, EB_PAGE_SIZE, 0, EB_PAGE_SIZE, buf; pebs; err)⟫ ⟨aubi_io_write_vidhdr#(m2, avidhdr(v, m, m0, m3, m4); apebs; err0)⟩ (abs(pebs, apebs) ∧ err = err0) |
# buf2 = EB_PAGE_SIZE, pebs[m2] = mkpeb(buf1, EB_PAGE_SIZE, false), apebs[m2] = mkpeb(aehdr, empty, buf0, m1, false), aehdr.valid?, m2 < # apebs, m2 < # pebs, abs(pebs, apebs), abs-peb(mkpeb(buf1, EB_PAGE_SIZE, false), mkpeb(aehdr, empty, buf0, m1, false)), mtd-cons(pebs), ubi-io-inv(apebs), err = ESUCCESS → is-encoded(vidhdr(v, m, m0, m3, m4), buf2), err = ESUCCESS ∨ ⌊err⌋ ⊦ ⟪if err = ESUCCESS then mtd_asm_write#(m2, EB_PAGE_SIZE, 0, EB_PAGE_SIZE, buf2; pebs; err)⟫ ⟨aubi_io_write_vidhdr#(m2, avidhdr(v, m, m0, m3, m4); apebs; err0)⟩ (abs(pebs, apebs) ∧ err = err0)