| # buf = n0 + n + ENCODED_ELEM_SIZE, # buf1 = # buf, str0 = "encoding_nonempty: encoding is empty", subarray(buf1, n + ENCODED_ELEM_SIZE, n0) = subarray(buf, n + ENCODED_ELEM_SIZE, n0), subarray(buf1, 0, n) = subarray(buf, 0, n), is-encoded(a, subarray(buf1, n, ENCODED_ELEM_SIZE)), isempty(buf1, n, ENCODED_ELEM_SIZE), n + ENCODED_ELEM_SIZE ≤ # buf ⊦ ∀ . true → ⟪err := EINVAL⟫ ((err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → subarray(buf1, n, ENCODED_ELEM_SIZE) ≠ mkempbuf(ENCODED_ELEM_SIZE))) |
# buf1 = # buf, # buf = n0 + n + ENCODED_ELEM_SIZE, subarray(buf1, 0, n) = subarray(buf, 0, n), subarray(buf1, n + ENCODED_ELEM_SIZE, n0) = subarray(buf, n + ENCODED_ELEM_SIZE, n0), is-encoded(a, subarray(buf1, n, ENCODED_ELEM_SIZE)), isempty(buf1, n, ENCODED_ELEM_SIZE), n + ENCODED_ELEM_SIZE ≤ # buf ⊦ ⟪err := EINVAL⟫ ((err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → subarray(buf1, n, ENCODED_ELEM_SIZE) ≠ mkempbuf(ENCODED_ELEM_SIZE)))