| pebs[m0] = mkpeb(buf0, 0, false), buf = mkbuf(EB_PAGE_SIZE), aehdr.valid?, m0 < # pebs, mtd-cons(pebs) ⊦ [encode_echeader#(EB_PAGE_SIZE, echdr(aehdr.ec); buf; err)] ( (err = ESUCCESS ∨ ⌊err⌋ ) ∧ # buf = EB_PAGE_SIZE ∧ (err = ESUCCESS → is-encoded(echdr(aehdr.ec), buf)) → ⟪if err = ESUCCESS then mtd_asm_write#(m0, 0, 0, EB_PAGE_SIZE, buf; pebs; err)⟫ mtd-cons(pebs)) |
pebs[m0] = mkpeb(buf0, 0, false), buf = mkbuf(EB_PAGE_SIZE), aehdr.valid?, m0 < # pebs, mtd-cons(pebs) ⊦ ∀ buf, err. (err = ESUCCESS ∨ ⌊err⌋ ) ∧ # buf = EB_PAGE_SIZE ∧ (err = ESUCCESS → is-encoded(echdr(aehdr.ec), buf)) → ⟪if err = ESUCCESS then mtd_asm_write#(m0, 0, 0, EB_PAGE_SIZE, buf; pebs; err)⟫ mtd-cons(pebs)