| pebs[m0] = mkpeb(buf0, m1, false), buf1 = subarray(buf0, 0, EB_PAGE_SIZE), m0 < # pebs, mtd-cons(pebs), EB_PAGE_SIZE ≤ PEB_SIZE, EB_PAGE_SIZE ≤ # subarray(buf0, 0, EB_PAGE_SIZE) ⊦ [decode_echeader#(EB_PAGE_SIZE, subarray(buf0, 0, EB_PAGE_SIZE); ehdr; err)] ( (err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → is-encoded(ehdr, subarray(buf1, 0, EB_PAGE_SIZE))) → ⟪if err = ESUCCESS then aehdr := aechdr(ehdr.ec)⟫ true), subarray(buf0, 0, EB_PAGE_SIZE) = emptypage |
pebs[m0] = mkpeb(buf0, m1, false), subarray(buf0, 0, EB_PAGE_SIZE) ≠ emptypage, m0 < # pebs, mtd-cons(pebs), EB_PAGE_SIZE ≤ PEB_SIZE ⊦ [decode_echeader#(EB_PAGE_SIZE, subarray(buf0, 0, EB_PAGE_SIZE); ehdr; err)] ( (err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → is-encoded(ehdr, subarray(buf0, 0, EB_PAGE_SIZE))) → ⟪if err = ESUCCESS then aehdr := aechdr(ehdr.ec)⟫ true)
Used simplifier rules: # buf = n ⊦ subarray(buf, 0, n) = buf; (s)% ⊦ m ≤ m; (s)% ⊦ # subarray(buf, m, n) = n; (s)