| # buf2 = NODE_HEADER_SIZE, # buf = nd.alignedsize, abs-nodes(buf0, 2 * NODE_HEADER_SIZE + m + nd.alignedsize, x1, lax1, true), abs-nodes(subarray(buf0, 0, n0), 2 * NODE_HEADER_SIZE + m + nd.alignedsize, x, lax, true), is-aligned(n0, NODE_HEADER_SIZE), is-encoded(nd, subarray(buf, 0, node-size-headerless(nd))), is-encoded(nodeheader(node-size-headerless(nd), false), buf2), n0 ≤ # buf0, lax ⊑ lax1, x ⊑ x1, ∀ buf3, m, x, lax, n. # buf3 < #((buf2 + buf + validtrailer) + buf0) → abs-nodes(buf3, m, x, lax, true) ∧ is-aligned(n, NODE_HEADER_SIZE) ∧ n ≤ # buf3 → (∃ x0, lax0. x0 ⊑ x ∧ lax0 ⊑ lax ∧ abs-nodes(subarray(buf3, 0, n), m, x0, lax0, true)) ⊦ nd ' + x ⊑ nd ' + x1 ∧ @(m, nd.alignedsize + 2 * NODE_HEADER_SIZE) ' + lax ⊑ @(m, 2 * NODE_HEADER_SIZE + nd.alignedsize) ' + lax1 ∧ abs-nodes(buf2 + buf + validtrailer + subarray(buf0, 0, n0), m, nd ' + x, @(m, nd.alignedsize + 2 * NODE_HEADER_SIZE) ' + lax, true) |
# buf = nd.alignedsize, # buf2 = NODE_HEADER_SIZE, abs-nodes(subarray(buf0, 0, n0), 2 * NODE_HEADER_SIZE + m + nd.alignedsize, x, lax, true), abs-nodes(buf0, 2 * NODE_HEADER_SIZE + m + nd.alignedsize, x1, lax1, true), is-aligned(n0, NODE_HEADER_SIZE), is-encoded(nodeheader(node-size-headerless(nd), false), buf2), is-encoded(nd, subarray(buf, 0, node-size-headerless(nd))), n0 ≤ # buf0, x ⊑ x1, lax ⊑ lax1, ∀ buf3, m, x, lax, n. # buf3 < #((buf2 + buf + validtrailer) + buf0) → abs-nodes(buf3, m, x, lax, true) ∧ is-aligned(n, NODE_HEADER_SIZE) ∧ n ≤ # buf3 → (∃ x0, lax0. x0 ⊑ x ∧ lax0 ⊑ lax ∧ abs-nodes(subarray(buf3, 0, n), m, x0, lax0, true)) ⊦ abs-nodes(buf2 + buf + validtrailer + subarray(buf0, 0, n0), m, nd ' + x, @(m, nd.alignedsize + 2 * NODE_HEADER_SIZE) ' + lax, true)
Used simplifier rules: a: ⊦ (lax + lax0) + lax1 = lax + lax0 + lax1; from specification list[laddress-list]% ⊦ ladr ' + lax ⊑ ladr ' + lax0 ↔ lax ⊑ lax0; (s)%c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (x + y) + z = x + y + z; from specification list% ⊦ a ' + x ⊑ b ' + y ↔ a = b ∧ x ⊑ y; (ws)