| # lpt = # avol0, # avol1 = # avol0, n0 < # avol0 ∧ lpf2 = LP_INDEX_NODES ↔ n0 ∈ istore, lpt[n0] = mklp(m12, m13, lpf2, m14), istore[n, indexblock(indx, lax, m)][n0] = indexblock(indx1, lax1, m7), lpt[n] = mklp(m4, m5, lpf0, m6), istore[n] = indexblock(indx0, lax0, m3), lpt[n, mklp(m0, m1, lpf, m2)][n0] = mklp(m8, m9, lpf1, m10), istore[n0] = indexblock(indx2, lax2, m11), n < # avol0, n0 ∈ istore → abs-leb(avol0[n0], indexblock(indx2, lax2, m11), mklp(m11, m13, lpf2, m14)) ∧ m12 = m11, (lpf0 = LP_INDEX_NODES → m4 = m3) → m0 = m ∧ lpf = LP_INDEX_NODES, (lpf0 = LP_INDEX_NODES → abs-leb(avol0[n], indexblock(indx0, lax0, m3), mklp(m4, m5, LP_INDEX_NODES, m6))) → abs-leb(avol1[n], indexblock(indx, lax, m), mklp(m0, m1, lpf, m2)), n0 < # avol0 ∧ n0 ≠ n → avol1[n0] = avol0[n0] ⊦ (n0 < # avol0 ∧ lpf1 = LP_INDEX_NODES ↔ n0 ∈ istore[n, indexblock(indx, lax, m)]) ∧ (n0 ∈ istore[n, indexblock(indx, lax, m)] → abs-leb(avol1[n0], indexblock(indx1, lax1, m7), mklp(m7, m9, lpf1, m10)) ∧ m8 = m7) |
# avol1 = # avol0, # lpt = # avol0, n0 < # avol0 ∧ lpf2 = LP_INDEX_NODES ↔ n0 ∈ istore, istore[n0] = indexblock(indx2, lax2, m11), lpt[n, mklp(m0, m1, lpf, m2)][n0] = mklp(m8, m9, lpf1, m10), istore[n] = indexblock(indx0, lax0, m3), lpt[n] = mklp(m4, m5, lpf0, m6), istore[n, indexblock(indx, lax, m)][n0] = indexblock(indx1, lax1, m7), lpt[n0] = mklp(m12, m13, lpf2, m14), n0 = n, n < # avol0, n0 < # avol0 ∧ n0 ≠ n → avol1[n0] = avol0[n0], (lpf0 = LP_INDEX_NODES → abs-leb(avol0[n], indexblock(indx0, lax0, m3), mklp(m4, m5, LP_INDEX_NODES, m6))) → abs-leb(avol1[n], indexblock(indx, lax, m), mklp(m0, m1, lpf, m2)), (lpf0 = LP_INDEX_NODES → m4 = m3) → m0 = m ∧ lpf = LP_INDEX_NODES, n0 ∈ istore → abs-leb(avol0[n0], indexblock(indx2, lax2, m11), mklp(m11, m13, lpf2, m14)) ∧ m12 = m11 ⊦ (n0 < # avol0 ∧ lpf1 = LP_INDEX_NODES ↔ n0 ∈ istore[n, indexblock(indx, lax, m)]) ∧ (n0 ∈ istore[n, indexblock(indx, lax, m)] → abs-leb(avol1[n0], indexblock(indx1, lax1, m7), mklp(m7, m9, lpf1, m10)) ∧ m8 = m7)
Used simplifier rules: ⊦ n ≠ n0 → istore[n0, iblock][n] = istore[n]; (s)% ⊦ m ≠ n → lpt[n, lp][m] = lpt[m]; (s)% ⊦ n ≠ n0 → (n ∈ istore[n0, iblock] ↔ n ∈ istore); (s)%⊦ mklp(m, m0, lpf, m1) = mklp(m2, m3, lpf0, m4) ↔ m = m2 ∧ m0 = m3 ∧ lpf = lpf0 ∧ m1 = m4; (ws)%⊦ indexblock(indx, lax, m) = indexblock(indx0, lax0, m0) ↔ indx = indx0 ∧ lax = lax0 ∧ m = m0; (ws)%lf-01: ⊦ m < n ∧ n = n0 → m < n0; (forward) from specification nat-basic Used formulas: n0 = n