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