| abs-nodes(buf0, m + # buf1, nd ' + x1, @(m0, m1) ' + lax0, true), is-aligned(n, NODE_HEADER_SIZE), n ≤ # buf1 + # buf0, ∃ buf0, buf2. buf1 = buf0 + buf2 + validtrailer ∧ is-encoded(nodeheader(# buf2, true), buf0) ∧ is-aligned(# buf2, 2 * NODE_HEADER_SIZE), ∀ buf2, m, x, lax, n. # buf2 < #(buf1 + buf0) → abs-nodes(buf2, m, x, lax, true) ∧ is-aligned(n, NODE_HEADER_SIZE) ∧ n ≤ # buf2 → (∃ x0, lax0. x0 ⊑ x ∧ lax0 ⊑ lax ∧ abs-nodes(subarray(buf2, 0, n), m, x0, lax0, true)) ⊦ ∃ x, lax1. x ⊑ nd ' + x1 ∧ lax1 ⊑ @(m0, m1) ' + lax0 ∧ abs-nodes(subarray(buf1 + buf0, 0, n), m, x, lax1, true) |
# buf2 = NODE_HEADER_SIZE, abs-nodes(buf0, 2 * NODE_HEADER_SIZE + m + # buf, nd ' + x1, @(m0, m1) ' + lax0, true), is-aligned(# buf, 2 * NODE_HEADER_SIZE), is-aligned(n, NODE_HEADER_SIZE), is-encoded(nodeheader(# buf, true), buf2), n ≤ 2 * NODE_HEADER_SIZE + # buf + # buf0, ∀ 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)) ⊦ ∃ x, lax1. x ⊑ nd ' + x1 ∧ lax1 ⊑ @(m0, m1) ' + lax0 ∧ abs-nodes(subarray((buf2 + buf + validtrailer) + buf0, 0, n), m, x, lax1, true)
Used simplifier rules: c: ⊦ m + n = n + m; from specification nat-basic% ⊦ m + m = 2 * m; (s)%lfw-is-encoded-nodeheader-size: ⊦ is-encoded(ndhd, buf) → # buf = NODE_HEADER_SIZE; (forward) from specification abs-node%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%append-a: ⊦ (buf + buf0) + buf1 = buf + buf0 + buf1; from specification array-splice[buffer]% ⊦ # validtrailer = NODE_HEADER_SIZE; (s)% ⊦ #(buf + buf0) = # buf + # buf0; (s)