| err = ESUCCESS, m1 = m0, is-encoded(nodeheader(m0, false), subarray(buf, n, NODE_HEADER_SIZE)), n + align↑(m0, 2 * NODE_HEADER_SIZE) + 2 * NODE_HEADER_SIZE ≤ # buf, n + NODE_HEADER_SIZE ≤ # buf, err = ESUCCESS → is-encoded(nd, subarray(buf, n + NODE_HEADER_SIZE, node-size-headerless(nd))) ∧ (n + NODE_HEADER_SIZE) + node-size-headerless(nd) ≤ # buf ∧ m1 = node-size-headerless(nd), err = ESUCCESS ∨ ⌊err⌋ ⊦ ⟪skip; if err = ESUCCESS ∧ ¬ range=(buf, n + NODE_HEADER_SIZE + align↑(m0, 2 * NODE_HEADER_SIZE), validtrailer, 0, NODE_HEADER_SIZE) then {debug#("persistence: decode_node no validtrailer"); err := EIO}⟫ ( (err = ESUCCESS ∨ ⌊err⌋ ) ∧ ( err = ESUCCESS → (∃ buf0, buf1. subarray(buf, n, 2 * NODE_HEADER_SIZE + nd.alignedsize) = buf0 + buf1 + validtrailer ∧ is-encoded(nodeheader(node-size-headerless(nd), false), buf0) ∧ is-encoded(nd, subarray(buf1, 0, node-size-headerless(nd))) ∧ # buf1 = nd.alignedsize) ∧ align↑(m0, 2 * NODE_HEADER_SIZE) = nd.alignedsize)) |
err = ESUCCESS, m1 = m0, is-encoded(nodeheader(m0, false), subarray(buf, n, NODE_HEADER_SIZE)), n + NODE_HEADER_SIZE ≤ # buf, n + align↑(m0, 2 * NODE_HEADER_SIZE) + 2 * NODE_HEADER_SIZE ≤ # buf, err = ESUCCESS → is-encoded(nd, subarray(buf, n + NODE_HEADER_SIZE, node-size-headerless(nd))) ∧ (n + NODE_HEADER_SIZE) + node-size-headerless(nd) ≤ # buf ∧ m1 = node-size-headerless(nd), err = ESUCCESS ∨ ⌊err⌋ ⊦ ⟪if err = ESUCCESS ∧ ¬ range=(buf, n + NODE_HEADER_SIZE + align↑(m0, 2 * NODE_HEADER_SIZE), validtrailer, 0, NODE_HEADER_SIZE) then {debug#("persistence: decode_node no validtrailer"); err := EIO}⟫ ( (err = ESUCCESS ∨ ⌊err⌋ ) ∧ ( err = ESUCCESS → (∃ buf0, buf1. subarray(buf, n, 2 * NODE_HEADER_SIZE + nd.alignedsize) = buf0 + buf1 + validtrailer ∧ is-encoded(nodeheader(node-size-headerless(nd), false), buf0) ∧ is-encoded(nd, subarray(buf1, 0, node-size-headerless(nd))) ∧ # buf1 = nd.alignedsize) ∧ align↑(m0, 2 * NODE_HEADER_SIZE) = nd.alignedsize))