| LEB_SIZE = n1 + m1 + n, n0 < LEB_SIZE, n0 < n1, m2 < # avols[v], (m1 + n) + n0 < # mkempbuf(m1) + #(subarray(buf, n2, n) + mkempbuf(n1)), ebm-cons(avols), is-aligned(m1, EB_PAGE_SIZE), is-aligned(n, EB_PAGE_SIZE), v ∈ avols, n1 ≤ LEB_SIZE, n + m1 ≤ LEB_SIZE, m1 ≤ LEB_SIZE, n2 + n ≤ # buf, m1 + n ≤ LEB_SIZE, n + n2 ≤ # buf ⊦ ((m1 + n) + n0 < # mkempbuf(m1) ⊃ mkempbuf(m1)[(m1 + n) + n0];(subarray(buf, n2, n) + mkempbuf(n1))[(m1 + n) + n0 - # mkempbuf(m1)]) = empty, avols[v][m2].mapped? |
LEB_SIZE = n1 + m1 + n, m2 < # avols[v], n0 < LEB_SIZE, n0 < n1, ebm-cons(avols), is-aligned(n, EB_PAGE_SIZE), is-aligned(m1, EB_PAGE_SIZE), v ∈ avols, n + n2 ≤ # buf, m1 + n ≤ LEB_SIZE, n2 + n ≤ # buf, m1 ≤ LEB_SIZE, n + m1 ≤ LEB_SIZE, n1 ≤ LEB_SIZE ⊦ (subarray(buf, n2, n) + mkempbuf(n1))[n + n0] = empty, avols[v][m2].mapped?
Used simplifier rules: ⊦ m + n < m + n0 ↔ n < n0; (s)%append-a: ⊦ (buf + buf0) + buf1 = buf + buf0 + buf1; from specification array-splice[buffer]% ⊦ # subarray(buf, m, n) = n; (s)% ⊦ #(buf + buf0) = # buf + # buf0; (s)% ⊦ m + n - m = n; (s)%c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic% ⊦ ¬ m + n < m; (s)% ⊦ # mkempbuf(n) = n; (s)