| # avol0 = # avol1, # lpt = # avol1, n < # avol1 ∧ lpf0 = LP_GROUP_NODES ↔ n ∈ gstore, lpt[n] = mklp(m4, m5, lpf0, m6), gstore[n] = groupblock(gndx0, lax0, m3), remove-refsize0(gstore)[n] = groupblock(gndx, lax, m), lpt.map(λ lp. (lp.ref-size = 0 ∧ lp.flags ≠ LP_FREE ⊃ mklp(0, 0, LP_FREE, lp.gcheapidx);lp))[n] = mklp(m0, m1, lpf, m2), dom remove-refsize0(gstore) ∩ ginval = ∅, n ∈ gstore ∧ ¬ n ∈ ginval → abs-leb(avol0[n], groupblock(gndx0, lax0, m3), mklp(m4, m5, lpf0, m6)), n ∈ gstore → m4 = m3, ∀ n. n < # avol1 ∧ (lpt[n].ref-size ≠ 0 ∨ lpt[n].flags = LP_FREE) → avol0[n] = avol1[n], ¬(n < # avol1 ∧ lpf = LP_GROUP_NODES ↔ n ∈ remove-refsize0(gstore)) ∨ ¬(n ∈ remove-refsize0(gstore) → abs-leb(avol1[n], groupblock(gndx, lax, m), mklp(m0, m1, lpf, m2))) ∨ ¬(n ∈ remove-refsize0(gstore) → m0 = m) ⊦ |
# lpt = # avol1, # avol0 = # avol1, n < # avol1 ∧ lpf0 = LP_GROUP_NODES ↔ n ∈ gstore, lpt.map(λ lp. (lp.ref-size = 0 ∧ lp.flags ≠ LP_FREE ⊃ mklp(0, 0, LP_FREE, lp.gcheapidx);lp))[n] = mklp(m0, m1, lpf, m2), remove-refsize0(gstore)[n] = groupblock(gndx, lax, m), gstore[n] = groupblock(gndx0, lax0, m3), lpt[n] = mklp(m4, m5, lpf0, m6), dom remove-refsize0(gstore) ∩ ginval = ∅, n < # avol1, n ∈ gstore → m4 = m3, n ∈ gstore ∧ ¬ n ∈ ginval → abs-leb(avol0[n], groupblock(gndx0, lax0, m3), mklp(m4, m5, lpf0, m6)), ∀ n. n < # avol1 ∧ (lpt[n].ref-size ≠ 0 ∨ lpt[n].flags = LP_FREE) → avol0[n] = avol1[n], ¬(n < # avol1 ∧ lpf = LP_GROUP_NODES ↔ n ∈ remove-refsize0(gstore)) ∨ ¬(n ∈ remove-refsize0(gstore) → abs-leb(avol1[n], groupblock(gndx, lax, m), mklp(m0, m1, lpf, m2))) ∨ ¬(n ∈ remove-refsize0(gstore) → m0 = m) ⊦
Used simplifier rules: ⊦ ¬ n ∈ gstore → gstore[n] = (∅)[n]; (s)% ⊦ m < n ↔ ¬ n ≤ m; (ss)% ⊦ m ≤ n → (n < m ↔ false); (s)% ⊦ n ∈ remove-refsize0(gstore) ↔ n ∈ gstore ∧ gstore[n].ref-size ≠ 0; (ws) Used formulas: n < # avol1