| # avol1 = # avol0, avol0[n] = mapped(buf), n < # avol0, # buf0 < EB_PAGE_SIZE, n0 < # avol0, is-aligned(# buf, EB_PAGE_SIZE), avol0[n, mapped(buf + buf0)][n0].mapped? → avol1[n0] = mapped(subarray(avol0[n, mapped(buf + buf0)][n0].data, 0, align↓(# avol0[n, mapped(buf + buf0)][n0].data, EB_PAGE_SIZE))), ¬ avol0[n, mapped(buf + buf0)][n0].mapped? ∧ avol1[n0].mapped? → # avol1[n0].data ≤ LEB_SIZE ∧ is-aligned(# avol1[n0].data, EB_PAGE_SIZE) ⊦ (avol0[n0].mapped? → avol1[n0] = mapped(subarray(avol0[n0].data, 0, align↓(# avol0[n0].data, EB_PAGE_SIZE)))) ∧ (¬ avol0[n0].mapped? ∧ avol1[n0].mapped? → # avol1[n0].data ≤ LEB_SIZE ∧ is-aligned(# avol1[n0].data, EB_PAGE_SIZE)) |
⊦ m ≠ n → avol[n, aleb][m] = avol[m]
Used simplifier rules: ⊦ m < # avol → avol[m, aleb][m] = aleb; (s)% ⊦ mapped(buf).mapped?; (s)% ⊦ mapped(buf).data = buf; (s)% ⊦ #(buf + buf0) = # buf + # buf0; (s)%append-a: ⊦ (buf + buf0) + buf1 = buf + buf0 + buf1; from specification array-splice[buffer]% ⊦ EB_PAGE_SIZE ≠ 0; (s)%n ≠ 0 ⊦ is-aligned(n0, n) → align↓(n0 + n1, n) = n0 + align↓(n1, n); (s)%n ≠ 0 ⊦ m < n → align↓(m, n) = 0; (s)% ⊦ n + 0 = n; (s)%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic%n = # buf ⊦ subarray(buf + buf0, 0, n) = buf; (s)%m ≠ 0 ⊦ is-aligned(n, m) → n % m = 0; (s)%n ≠ 0, m % n = 0 ⊦ align↓(m, n) = m; (s)%# buf = n ⊦ subarray(buf, 0, n) = buf; (s)% ⊦ mapped(buf) = mapped(buf0) ↔ buf = buf0; (s) Used terms: n0, mapped(buf + buf0), n, avol0