| x = nd + x0, # buf < x.flashsize, abs-nodes(buf, m, x, lax, false), ∀ buf0, x, m, lax. # buf0 < # buf → # buf0 < x.flashsize ∧ abs-nodes(buf0, m, x, lax, false) → x = [] ⊦ x = [] |
# buf < (2 * NODE_HEADER_SIZE + nd.alignedsize) + x0.flashsize, abs-nodes(buf, m, nd ' + x0, lax, false), ∀ buf0, x, m, lax. # buf0 < # buf → # buf0 < x.flashsize ∧ abs-nodes(buf0, m, x, lax, false) → x = [] ⊦
Used simplifier rules: size-rec: ⊦ (a ' + x).flashsize = a.flashsize + x.flashsize;%c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%mult-c: ⊦ m * n = n * m; from specification nat-mult%mult-a: ⊦ m0 * m * n = (m0 * m) * n; from specification nat-mult% ⊦ 2 * NODE_HEADER_SIZE + n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ nd.flashsize = 2 * NODE_HEADER_SIZE + nd.alignedsize; (s)%a: ⊦ (x + y) + z = x + y + z; from specification list% ⊦ a ' + x ≠ []; (s)% ⊦ a + x = a ' + x; (s)