| # lpt = # avol, lpt[n] = mklp(m4, m5, lpf0, m6), gstore[n] = groupblock(gndx0, lax0, m3), n < # avol, (lpf0 = LP_GROUP_NODES → m4 = m3) → m0 = m ∧ lpf = LP_GROUP_NODES, ¬ n ∈ ginval ∧ (lpf0 = LP_GROUP_NODES → abs-leb(avol[n], groupblock(gndx0, lax0, m3), mklp(m4, m5, LP_GROUP_NODES, m6))) → abs-leb(aleb, groupblock(gndx, lax, m), mklp(m0, m1, lpf, m2)), ∀ n. (n < # avol ∧ lpt[n].flags = LP_GROUP_NODES ↔ n ∈ gstore) ∧ (n ∈ gstore ∧ ¬ n ∈ ginval → abs-leb(avol[n], gstore[n], lpt[n])) ∧ (n ∈ gstore → lpt[n].ref-size = gstore[n].ref-size) ⊦ ∀ n0. (n0 < # avol ∧ lpt[n, mklp(m0, m1, lpf, m2)][n0].flags = LP_GROUP_NODES ↔ n0 ∈ gstore[n, groupblock(gndx, lax, m)]) ∧ ( n0 ∈ gstore[n, groupblock(gndx, lax, m)] ∧ ¬ n0 ∈ ginval → abs-leb(avol[n, aleb][n0], gstore[n, groupblock(gndx, lax, m)][n0], lpt[n, mklp(m0, m1, lpf, m2)][n0])) ∧ (n0 ∈ gstore[n, groupblock(gndx, lax, m)] → lpt[n, mklp(m0, m1, lpf, m2)][n0].ref-size = gstore[n, groupblock(gndx, lax, m)][n0].ref-size) |
# lpt = # avol, lpt[n] = mklp(m4, m5, lpf0, m6), gstore[n] = groupblock(gndx0, lax0, m3), n < # avol, (lpf0 = LP_GROUP_NODES → m4 = m3) → m0 = m ∧ lpf = LP_GROUP_NODES, ¬ n ∈ ginval ∧ (lpf0 = LP_GROUP_NODES → abs-leb(avol[n], groupblock(gndx0, lax0, m3), mklp(m4, m5, LP_GROUP_NODES, m6))) → abs-leb(aleb, groupblock(gndx, lax, m), mklp(m0, m1, lpf, m2)), ∀ n. (n < # avol ∧ lpt[n].flags = LP_GROUP_NODES ↔ n ∈ gstore) ∧ (n ∈ gstore ∧ ¬ n ∈ ginval → abs-leb(avol[n], gstore[n], lpt[n])) ∧ (n ∈ gstore → lpt[n].ref-size = gstore[n].ref-size) ⊦ (n0 < # avol ∧ lpt[n, mklp(m0, m1, lpf, m2)][n0].flags = LP_GROUP_NODES ↔ n0 ∈ gstore[n, groupblock(gndx, lax, m)]) ∧ ( n0 ∈ gstore[n, groupblock(gndx, lax, m)] ∧ ¬ n0 ∈ ginval → abs-leb(avol[n, aleb][n0], gstore[n, groupblock(gndx, lax, m)][n0], lpt[n, mklp(m0, m1, lpf, m2)][n0])) ∧ (n0 ∈ gstore[n, groupblock(gndx, lax, m)] → lpt[n, mklp(m0, m1, lpf, m2)][n0].ref-size = gstore[n, groupblock(gndx, lax, m)][n0].ref-size)
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%lf-01: ⊦ m < n ∧ n = n0 → m < n0; (forward) from specification nat-basic%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic