| 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, ∀ n1. n1 < ENCODED_ELEM_SIZE → buf[n + n1] = empty ⊦ buf[n0] = empty |
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 - n < ENCODED_ELEM_SIZE → buf[n + (n0 - n)] = empty ⊦ buf[n0] = empty
Used terms: n0 - n