| # buf2 = # vtbl * (ENCODED_VOLID_SIZE + ENCODED_NAT_SIZE), # buf0 = ENCODED_NAT_SIZE, # buf4 = (# buf2 + # buf3) + ENCODED_NAT_SIZE, # buf = # buf4, subarray(buf4, ENCODED_NAT_SIZE, # buf2 + # buf3) = subarray(buf, ENCODED_NAT_SIZE, # buf2 + # buf3), # buf3 < ENCODED_VOLID_SIZE, # vtbl1 * (ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE) < ENCODED_VOLID_SIZE, is-encoded(#(vtbl1 ∪ vtbl), buf0), is-encoded-rec(vtbl, buf2), v ∈ vtbl1, # vtbl1 * (ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE) ≤ # buf3, #(vtbl1 ∪ vtbl) * (ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE) ≤ # buf2 + # buf3, vtbl1 ⊥ vtbl, err0 = ESUCCESS → is-encoded(#(vtbl1 ∪ vtbl), subarray(buf4, 0, ENCODED_NAT_SIZE)) ∧ n1 = ENCODED_NAT_SIZE, err0 = ESUCCESS ∨ ⌊err0⌋ ⊦ v ∈ vtbl, ∀ v. (v ∈ vtbl1 ↔ v ∈ ∅) ∧ vtbl1[v] = (∅)[v] |
# buf = # buf4, # buf4 = (# buf2 + # buf3) + ENCODED_NAT_SIZE, # buf0 = ENCODED_NAT_SIZE, # buf2 = # vtbl * (ENCODED_VOLID_SIZE + ENCODED_NAT_SIZE), subarray(buf4, ENCODED_NAT_SIZE, # buf2 + # buf3) = subarray(buf, ENCODED_NAT_SIZE, # buf2 + # buf3), # vtbl1 * (ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE) < ENCODED_VOLID_SIZE, # buf3 < ENCODED_VOLID_SIZE, is-encoded(#(vtbl1 ∪ vtbl), buf0), is-encoded-rec(vtbl, buf2), v ∈ vtbl1, v0 ∈ vtbl1, #(vtbl1 ∪ vtbl) * (ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE) ≤ # buf2 + # buf3, # vtbl1 * (ENCODED_NAT_SIZE + ENCODED_VOLID_SIZE) ≤ # buf3, vtbl1 ⊥ vtbl, err0 = ESUCCESS → is-encoded(#(vtbl1 ∪ vtbl), subarray(buf4, 0, ENCODED_NAT_SIZE)) ∧ n1 = ENCODED_NAT_SIZE, err0 = ESUCCESS ∨ ⌊err0⌋ ⊦ v ∈ vtbl, v0 ∈ vtbl
Used simplifier rules: disjoint-in-left: ⊦ v ∈ vtbl ∧ vtbl ⊥ vtbl0 → ¬ v ∈ vtbl0; (forward) from specification store-union[vtbl]% ⊦ ¬ v ∈ vtbl → vtbl[v] = (∅)[v]; (s)% ⊦ ¬ v ∈ ∅; (s)