| pebs[m2] = mkpeb(buf1, m, false), apebs[m2] = mkpeb(aehdr1, avhdr, buf0, m1, false), buf2 = subarray(buf1, 0, EB_PAGE_SIZE), m2 < # apebs, m2 < # pebs, abs(pebs, apebs), abs-peb(mkpeb(buf1, m, false), mkpeb(aehdr1, avhdr, buf0, m1, false)), mtd-cons(pebs), ubi-io-inv(apebs), EB_PAGE_SIZE ≤ PEB_SIZE, EB_PAGE_SIZE ≤ # subarray(buf1, 0, EB_PAGE_SIZE) ⊦ [decode_echeader#(EB_PAGE_SIZE, subarray(buf1, 0, EB_PAGE_SIZE); ehdr; err)] ( (err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → is-encoded(ehdr, subarray(buf2, 0, EB_PAGE_SIZE))) → ⟪aehdr := aehdr0; if err = ESUCCESS then aehdr := aechdr(ehdr.ec)⟫ ⟨aubi_io_read_echdr#(m2, apebs; aehdr0; isbad, err0)⟩ (aehdr = aehdr0 ∧ (bitflips ↔ isbad) ∧ err = err0)), subarray(buf1, 0, EB_PAGE_SIZE) = emptypage |
apebs[m2] = mkpeb(aehdr1, avhdr, buf0, m1, false), pebs[m2] = mkpeb(buf1, m, false), subarray(buf1, 0, EB_PAGE_SIZE) ≠ emptypage, m2 < # pebs, m2 < # apebs, abs(pebs, apebs), abs-peb(mkpeb(buf1, m, false), mkpeb(aehdr1, avhdr, buf0, m1, false)), mtd-cons(pebs), ubi-io-inv(apebs), EB_PAGE_SIZE ≤ PEB_SIZE ⊦ [decode_echeader#(EB_PAGE_SIZE, subarray(buf1, 0, EB_PAGE_SIZE); ehdr; err)] ( (err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → is-encoded(ehdr, subarray(buf1, 0, EB_PAGE_SIZE))) → ⟪aehdr := aehdr0; if err = ESUCCESS then aehdr := aechdr(ehdr.ec)⟫ ⟨aubi_io_read_echdr#(m2, apebs; aehdr0; isbad, err0)⟩ (aehdr = aehdr0 ∧ (bitflips ↔ isbad) ∧ err = err0))
Used simplifier rules: # buf = n ⊦ subarray(buf, 0, n) = buf; (s)% ⊦ m ≤ m; (s)% ⊦ # subarray(buf, m, n) = n; (s)