| # gndx = # lax, # lpt = # avol, # lpt0 = # avol, LEB_SIZE = n0 + # buf1, avol[m5] = mapped(buf1), ndhd = nodeheader(m, boolvar), LEB_SIZE < m1 + 2 * NODE_HEADER_SIZE + align↑(m, 2 * NODE_HEADER_SIZE), m5 < # avol, m1 < LEB_SIZE, # buf1 < m1 + 2 * NODE_HEADER_SIZE + align↑(m, 2 * NODE_HEADER_SIZE), abs-nodes(buf1, gndx, lax, true), awbuf-inv(avol, bleb), buf-ro-rw-mode(isbuf, bleb, lpt0, avol), bufs-log-only(bleb, log0, lpt0), is-encoded(ndhd, subarray(buf1 + mkempbuf(n0), m1, NODE_HEADER_SIZE)), lpt-free-unref(lpt), lpt-leb-size(lpt), lpt-ram-flash(lpt0, lpt, log0), read-gblock-inv(m5, m1, ax, gndx0, ax1, gndx2, buf1, false), m1 + NODE_HEADER_SIZE ≤ LEB_SIZE, # buf1 ≤ LEB_SIZE ⊦ ⟪debug# ( "persistence: read_gblock_nodes ignoring node of size " + (2 * NODE_HEADER_SIZE + align↑(m, 2 * NODE_HEADER_SIZE)).toString + " at offset " + m1.toString + " in LEB " + m5.toString); err := ENOENT; m0 := m1; if err = ESUCCESS then m0 := m0 + 2 * NODE_HEADER_SIZE + align↑(m, 2 * NODE_HEADER_SIZE)⟫ ( (err = ESUCCESS ∨ err = ENOENT ∨ ⌊err⌋ ) ∧ (err = ESUCCESS ∨ err = ENOENT → read-gblock-inv(m5, m0, ax, gndx0, ax1, gndx2, avol[m5].data, err = ENOENT)) ∧ (err ≠ ESUCCESS ⊃ 0;LEB_SIZE - m0) + m1 < LEB_SIZE), isempty(buf1 + mkempbuf(n0), m1, NODE_HEADER_SIZE) |
# gndx = # lax, # lpt = # avol, # lpt0 = # avol, LEB_SIZE = n0 + # buf1, avol[m5] = mapped(buf1), # buf1 < m1 + 2 * NODE_HEADER_SIZE + align↑(m, 2 * NODE_HEADER_SIZE), m5 < # avol, m1 < LEB_SIZE, LEB_SIZE < m1 + 2 * NODE_HEADER_SIZE + align↑(m, 2 * NODE_HEADER_SIZE), abs-nodes(buf1, gndx, lax, true), awbuf-inv(avol, bleb), buf-ro-rw-mode(isbuf, bleb, lpt0, avol), bufs-log-only(bleb, log0, lpt0), is-encoded(nodeheader(m, boolvar), subarray(buf1 + mkempbuf(n0), m1, NODE_HEADER_SIZE)), lpt-free-unref(lpt), lpt-leb-size(lpt), lpt-ram-flash(lpt0, lpt, log0), read-gblock-inv(m5, m1, ax, gndx0, ax1, gndx2, buf1, false), m1 + NODE_HEADER_SIZE ≤ LEB_SIZE, # buf1 ≤ LEB_SIZE, ¬ isempty(buf1 + mkempbuf(n0), m1, NODE_HEADER_SIZE) ⊦ ⟪debug# ( "persistence: read_gblock_nodes ignoring node of size " + (2 * NODE_HEADER_SIZE + align↑(m, 2 * NODE_HEADER_SIZE)).toString + " at offset " + m1.toString + " in LEB " + m5.toString); err := ENOENT; m0 := m1; if err = ESUCCESS then m0 := m0 + 2 * NODE_HEADER_SIZE + align↑(m, 2 * NODE_HEADER_SIZE)⟫ ( (err = ESUCCESS ∨ err = ENOENT ∨ ⌊err⌋ ) ∧ (err = ESUCCESS ∨ err = ENOENT → read-gblock-inv(m5, m0, ax, gndx0, ax1, gndx2, avol[m5].data, err = ENOENT)) ∧ (err ≠ ESUCCESS ⊃ 0;LEB_SIZE - m0) + m1 < LEB_SIZE)
Used simplifier rules: ⊦ NODE_HEADER_SIZE + n ≠ 0; (s)% ⊦ m0 * 1 = m0; (s)%m1 ≠ 0 ⊦ m < (* m1) * m + n0 ↔ (m1 - 1) * m + n0 ≠ 0; (s)% ⊦ m < m + n ↔ n ≠ 0; (s)% ⊦ 2 * m ≠ 1; (s)%n ≠ 0, m % n = 0 ⊦ align↑(m, n) = m; (s)% ⊦ m % 1 = 0; (s)% ⊦ NODE_HEADER_SIZE ≠ 0; (s)% ⊦ 2 * m = 0 ↔ m = 0; (s)% ⊦ m + n = 1 ↔ m = 0 ∧ n = 1 ∨ n = 0 ∧ m = 1; (ws)% ⊦ 1 < m ↔ ¬(m = 0 ∨ m = 1); (s)% ⊦ m + n < m + n0 ↔ n < n0; (s)% ⊦ m +1 = m + 1; (s)%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)%fle-01: ⊦ m ≤ n ∧ n < n0 → m < n0; (forward) from specification nat%transitivity: ⊦ n < n0 ∧ n0 < n1 → n < n1; (forward) from specification oelem[nat-set]%lf: ⊦ m < n ∧ n < n0 → m +1 < n0; (forward) from specification nat-basic%lf-02: ⊦ m < n ∧ m = n0 → n0 < n; (forward) from specification nat-basic%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic