| pebs[m0] = mkpeb(buf0, 0, false), buf = mkbuf(EB_PAGE_SIZE), buf = buf, buf1 = buf, ehdr0 = echdr(aehdr.ec), aehdr.valid?, m0 < # pebs, mtd-cons(pebs), EB_PAGE_SIZE ≤ # buf ⊦ [encode_echeader#(EB_PAGE_SIZE, echdr(aehdr.ec); buf; err)] ( (err = ESUCCESS ∨ ⌊err⌋ ) ∧ # buf = # buf1 ∧ (err = ESUCCESS → is-encoded(ehdr0, subarray(buf, 0, EB_PAGE_SIZE))) → ⟪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) ⊦ [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))
Used simplifier rules: # buf = n ⊦ subarray(buf, 0, n) = buf; (s)% ⊦ m ≤ m; (s)% ⊦ # mkbuf(n) = n; (s)