| # buf4 = 2 * ENCODED_NAT_SIZE + n0 + # buf2 + ENCODED_VOLID_SIZE, # buf11 = 0, # buf7 = ENCODED_NAT_SIZE, # vtbl1 = m + 1, # buf1 = 0, # buf = 0, # buf8 = ENCODED_VOLID_SIZE, # buf0 = ENCODED_NAT_SIZE, # buf2 = # vtbl * (ENCODED_VOLID_SIZE + ENCODED_NAT_SIZE), # buf3 = 0, # buf10 = 0, ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE + n0 = # buf9, ENCODED_NAT_SIZE + # buf2 + # buf9 = # buf4, ENCODED_NAT_SIZE = # buf5, is-encoded(#(vtbl1 ∪ vtbl), buf0), is-encoded(v, subarray(buf9, 0, ENCODED_VOLID_SIZE)), is-encoded(vtbl1[v], subarray(buf9, ENCODED_VOLID_SIZE, ENCODED_NAT_SIZE)), is-encoded-rec(vtbl, buf2), v ∈ vtbl1, #(vtbl1 ∪ vtbl) * (ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE) ≤ # buf2 + # buf9, (ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE) * m ≤ n0, 2 * ENCODED_NAT_SIZE + # buf2 + ENCODED_VOLID_SIZE ≤ # buf4, ENCODED_NAT_SIZE + # buf2 + ENCODED_VOLID_SIZE ≤ # buf4, ENCODED_VOLID_SIZE ≤ # buf9, m * (ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE) + ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE ≤ # buf9, ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE ≤ # buf9, vtbl1 ⊥ vtbl, err0 = ESUCCESS → is-encoded(#(vtbl1 ∪ vtbl), subarray(buf4, 0, ENCODED_NAT_SIZE)) ∧ n1 = ENCODED_NAT_SIZE, err0 = ESUCCESS ∨ ⌊err0⌋ ⊦ vtbl1 = ∅, is-encoded(vtbl1[v], subarray(subarray(buf9, 0, ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE), ENCODED_VOLID_SIZE, ENCODED_NAT_SIZE)), is-encoded-rec(vtbl[v, vtbl1[v]], buf2 + subarray(buf9, 0, ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE)), v ∈ vtbl |
⊦ n0 + n1 ≤ # buf ∧ m0 + m1 ≤ n1 → subarray(subarray(buf, n0, n1), m0, m1) = subarray(buf, n0 + m0, m1)
Used simplifier rules: ⊦ m + n ≤ m + n0 ↔ n ≤ n0; (s)% ⊦ m ≤ m; (s)%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic% ⊦ n + 0 = n; (s)% ⊦ m ≠ n → (m ≤ n ↔ m < n); (s)% ⊦ is-encoded(n, buf) → (is-encoded(n0, buf) ↔ n = n0); (s)%# buf = n ⊦ subarray(buf, 0, n) = buf; (s)% ⊦ m < n → m ≤ n; (s) Used terms: ENCODED_NAT_SIZE, ENCODED_VOLID_SIZE, ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE, 0, buf9