| # buf1 = n0 + ENCODED_ELEM_SIZE, # buf = n0 + ENCODED_ELEM_SIZE, subarray(buf1, ENCODED_ELEM_SIZE, n0) = subarray(buf, ENCODED_ELEM_SIZE, n0), is-encoded(a, subarray(buf1, 0, ENCODED_ELEM_SIZE)), ENCODED_ELEM_SIZE ≤ EB_PAGE_SIZE, EB_PAGE_SIZE ≤ n0 + ENCODED_ELEM_SIZE, ∀ n. n < EB_PAGE_SIZE → buf1[n] = empty ⊦ subarray(buf1, 0, ENCODED_ELEM_SIZE) = mkempbuf(ENCODED_ELEM_SIZE) |
⊦ buf = buf0 ↔ # buf = # buf0 ∧ (∀ n. n < # buf → buf[n] = buf0[n])
# buf = n0 + ENCODED_ELEM_SIZE, # buf1 = n0 + ENCODED_ELEM_SIZE, subarray(buf1, ENCODED_ELEM_SIZE, n0) = subarray(buf, ENCODED_ELEM_SIZE, n0), is-encoded(a, subarray(buf1, 0, ENCODED_ELEM_SIZE)), EB_PAGE_SIZE ≤ n0 + ENCODED_ELEM_SIZE, ENCODED_ELEM_SIZE ≤ EB_PAGE_SIZE, ∀ n. n < EB_PAGE_SIZE → buf1[n] = empty ⊦ # subarray(buf1, 0, ENCODED_ELEM_SIZE) = # mkempbuf(ENCODED_ELEM_SIZE) ∧ (∀ n. n < # subarray(buf1, 0, ENCODED_ELEM_SIZE) → subarray(buf1, 0, ENCODED_ELEM_SIZE)[n] = mkempbuf(ENCODED_ELEM_SIZE)[n])
Used terms: mkempbuf(ENCODED_ELEM_SIZE), subarray(buf1, 0, ENCODED_ELEM_SIZE)