| # buf = # vtbl * (ENCODED_VOLID_SIZE + ENCODED_NAT_SIZE), # buf0 = ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE, is-encoded(v, subarray(buf0, 0, ENCODED_VOLID_SIZE)), is-encoded(n, subarray(buf0, ENCODED_VOLID_SIZE, ENCODED_NAT_SIZE)), is-encoded-rec(vtbl, buf), ∀ vtbl0, buf, buf0, v, n. # vtbl0 < # vtbl → # buf = # vtbl0 * (ENCODED_VOLID_SIZE + ENCODED_NAT_SIZE) ∧ # buf0 = ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE ∧ is-encoded(v, subarray(buf0, 0, ENCODED_VOLID_SIZE)) ∧ is-encoded(n, subarray(buf0, ENCODED_VOLID_SIZE, ENCODED_NAT_SIZE)) ∧ is-encoded-rec(vtbl0, buf) → is-encoded-rec(vtbl0[v, n], buf + buf0) ∨ v ∈ vtbl0 ⊦ vtbl = ∅, is-encoded-rec(vtbl[v, n], buf + buf0), v ∈ vtbl |
vtbl ≠ ∅ ⊦ is-encoded-rec(vtbl, buf) ↔ (∃ v, buf0, buf1, buf2. v ∈ vtbl ∧ buf = buf0 + buf1 + buf2 ∧ is-encoded(v, buf0) ∧ is-encoded(vtbl[v], buf1) ∧ is-encoded-rec(vtbl -- v, buf2))
# buf0 = ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE, # buf = # vtbl * (ENCODED_VOLID_SIZE + ENCODED_NAT_SIZE), is-encoded(n, subarray(buf0, ENCODED_VOLID_SIZE, ENCODED_NAT_SIZE)), is-encoded(v, subarray(buf0, 0, ENCODED_VOLID_SIZE)), ∃ v, buf0, buf1, buf2. v ∈ vtbl ∧ buf = buf0 + buf1 + buf2 ∧ is-encoded(v, buf0) ∧ is-encoded(vtbl[v], buf1) ∧ is-encoded-rec(vtbl -- v, buf2), ∀ vtbl0, buf, buf0, v, n. # vtbl0 < # vtbl → # buf = # vtbl0 * (ENCODED_VOLID_SIZE + ENCODED_NAT_SIZE) ∧ # buf0 = ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE ∧ is-encoded(v, subarray(buf0, 0, ENCODED_VOLID_SIZE)) ∧ is-encoded(n, subarray(buf0, ENCODED_VOLID_SIZE, ENCODED_NAT_SIZE)) ∧ is-encoded-rec(vtbl0, buf) → is-encoded-rec(vtbl0[v, n], buf + buf0) ∨ v ∈ vtbl0 ⊦ vtbl = ∅, is-encoded-rec(vtbl[v, n], buf + buf0), v ∈ vtbl
Used terms: buf, vtbl