| apebs[m3] = mkpeb(aehdr, avhdr, buf0, m2, false), pebs[m3] = mkpeb(buf1, 2 * EB_PAGE_SIZE + m2, false), err = ESUCCESS, avhdr.valid?, aehdr.valid?, m3 < # apebs, m3 < # pebs, abs(pebs, apebs), abs-peb(mkpeb(buf1, 2 * EB_PAGE_SIZE + m2, false), mkpeb(aehdr, avhdr, buf0, m2, false)), is-aligned(m1, EB_PAGE_SIZE), is-aligned(n, EB_PAGE_SIZE), mtd-cons(pebs), ubi-io-inv(apebs), 0 + m1 ≤ # apebs[m3].data, m1 + n ≤ LEB_SIZE, n2 + n ≤ # buf, (m1 + 2 * EB_PAGE_SIZE) + n ≤ PEB_SIZE, m2 ≤ m1, LEB_SIZE - m1 ≥ n, LEB_SIZE ≥ m1 ⊦ abs (pebs[m3, (pebs[m3].data:= copy(buf, n2, pebs[m3].data, m1 + 2 * EB_PAGE_SIZE, n)).fill:= ((m1 + 2 * EB_PAGE_SIZE) + n)], apebs [m3, mkpeb (apebs[m3].echdr, apebs[m3].vidhdr, subarray(apebs[m3].data, 0, m1) + subarray(buf, n2, n) + mkempbuf(LEB_SIZE - m1 - n), m1 + n, apebs[m3].bad) ]) ∧ ESUCCESS = err |
apebs[m3] = mkpeb(aehdr, avhdr, buf0, m2, false), pebs[m3] = mkpeb(buf1, 2 * EB_PAGE_SIZE + m2, false), avhdr.valid?, aehdr.valid?, m3 < # apebs, m3 < # pebs, abs(pebs, apebs), abs-peb(mkpeb(buf1, 2 * EB_PAGE_SIZE + m2, false), mkpeb(aehdr, avhdr, buf0, m2, false)), is-aligned(m1, EB_PAGE_SIZE), is-aligned(n, EB_PAGE_SIZE), mtd-cons(pebs), ubi-io-inv(apebs), m1 + n ≤ LEB_SIZE, n2 + n ≤ # buf, (m1 + 2 * EB_PAGE_SIZE) + n ≤ PEB_SIZE, m2 ≤ m1, n + m1 ≤ LEB_SIZE, m2 ≤ LEB_SIZE, m1 ≤ LEB_SIZE ⊦ abs-peb (mkpeb(copy(buf, n2, buf1, m1 + 2 * EB_PAGE_SIZE, n), (m1 + 2 * EB_PAGE_SIZE) + n, false), mkpeb(aehdr, avhdr, subarray(buf0, 0, m1) + subarray(buf, n2, n) + mkempbuf(LEB_SIZE - m1 - n), m1 + n, false))
Used simplifier rules: ⊦ mkpeb(aehdr, avhdr, buf, m, boolvar).bad ↔ boolvar; (s)%append-a: ⊦ (buf + buf0) + buf1 = buf + buf0 + buf1; from specification array-splice[buffer]% ⊦ mkpeb(aehdr, avhdr, buf, m, boolvar).vidhdr = avhdr; (s)% ⊦ mkpeb(aehdr, avhdr, buf, m, boolvar).echdr = aehdr; (s)% ⊦ mkpeb(buf, m, boolvar).fill:= m0 = mkpeb(buf, m0, boolvar); (s)% ⊦ mkpeb(buf, m, boolvar).data:= buf0 = mkpeb(buf0, m, boolvar); (s)% ⊦ mkpeb(buf, m, boolvar).data = buf; (s)%n < # apebs ⊦ apebs[n] = mkpeb(aehdr, avhdr, buf, m, boolvar) ∧ ubi-io-inv(apebs) → # buf = LEB_SIZE; (s)% ⊦ m < n → (n ≤ m ↔ false); (s)% ⊦ m < n ↔ ¬ n ≤ m; (ss)% ⊦ mkpeb(aehdr, avhdr, buf, m, boolvar).data = buf; (s)%let: ⊦ n ≤ n0 ∧ n0 ≤ n1 → n ≤ n1; (forward) from specification nat%⊦ n < # apebs ∧ abs(pebs, apebs) ∧ ubi-io-inv(apebs) → ( abs(pebs[n, peb], apebs[n, apeb]) ↔ abs-peb(pebs[n], apebs[n]) → abs-peb(peb, apeb)); (ss)%c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic% ⊦ n + 0 = n; (s)%n0 ≤ n ⊦ m ≤ n - n0 ↔ m + n0 ≤ n; (s)% ⊦ m ≤ n → (n < m ↔ false); (s)% ⊦ m ≤ n ↔ ¬ n < m; (ss)% ⊦ n ≥ m ↔ m ≤ n; (s)