| n + ENCODED_ELEM_SIZE ≤ # buf, buf0 = buf ⊦ ⟪encode_nonempty#(a, n; buf; err)⟫ ( (err = ESUCCESS ∨ ⌊err⌋ ) ∧ # buf = # buf0 ∧ subarray(buf, 0, n) = subarray(buf0, 0, n) ∧ subarray(buf, n + ENCODED_ELEM_SIZE, # buf - n + ENCODED_ELEM_SIZE) = subarray(buf0, n + ENCODED_ELEM_SIZE, # buf - n + ENCODED_ELEM_SIZE) ∧ (err = ESUCCESS → is-encoded-nonempty(a, subarray(buf, n, ENCODED_ELEM_SIZE)))) |