| # lpt = # avol1, # avol0 = # avol1, # gndx = # lax, (n ∈ nx ∨ ¬ n ∈ ginval ⊃ groupblock(gstore[n].gndlist, gstore[n].ladrlist, (n ∈ gstore0 ⊃ gstore0[n].ref-size;0));gstore0[n]) = groupblock(gndx0, lax0, m0), (lpf0 = LP_FREE ∨ n ∈ nx ⊃ mklp(m3, m4, lpf0, m5) ;(lpf0 = LP_INDEX_NODES ∧ m3 ≠ 0 ⊃ mklp(m3, LEB_SIZE, LP_INDEX_NODES, m5);(m3 = 0 ⊃ mklp(0, 0, LP_FREE, m5);mklp(m3, m4, lpf0, m5))) ) = mklp((n ∈ gstore0 ⊃ gstore0[n].ref-size;0), m1, LP_GROUP_NODES, m2), lpt[n] = mklp(m3, m4, lpf0, m5), gstore[n] = groupblock(gndx, lax, m), avol0[n] = mapped(buf), n < # avol1, abs-nodes(buf, gndx, lax, m1 = LEB_SIZE), n ∈ gstore, n ∈ crash(gstore, gstore0, ginval, nx), m1 ≠ LEB_SIZE → m1 = # buf, n ∈ nx ∨ m3 ≠ 0 ∨ lpf0 = LP_FREE → mapped(buf) = avol1[n] ⊦ n ∈ ginval, avol1[n].mapped? ∧ abs-nodes(avol1[n].data, gndx0, lax0, m1 = LEB_SIZE) ∧ (m1 ≠ LEB_SIZE → m1 = # avol1[n].data) |
# lpt = # avol1, # avol0 = # avol1, # gndx = # lax, (lpf0 = LP_FREE ∨ n ∈ nx ⊃ mklp(m3, m4, lpf0, m5) ;(lpf0 = LP_INDEX_NODES ∧ m3 ≠ 0 ⊃ mklp(m3, LEB_SIZE, LP_INDEX_NODES, m5);(m3 = 0 ⊃ mklp(0, 0, LP_FREE, m5);mklp(m3, m4, lpf0, m5))) ) = mklp((n ∈ gstore0 ⊃ gstore0[n].ref-size;0), m1, LP_GROUP_NODES, m2), lpt[n] = mklp(m3, m4, lpf0, m5), gstore[n] = groupblock(gndx, lax, m), avol0[n] = mapped(buf), n < # avol1, abs-nodes(buf, gndx, lax, m1 = LEB_SIZE), n ∈ gstore, m1 ≠ LEB_SIZE → m1 = # buf, n ∈ nx ∨ m3 ≠ 0 ∨ lpf0 = LP_FREE → mapped(buf) = avol1[n] ⊦ n ∈ ginval, avol1[n].mapped? ∧ abs-nodes(avol1[n].data, gndx, lax, m1 = LEB_SIZE) ∧ (m1 ≠ LEB_SIZE → m1 = # avol1[n].data)
Used simplifier rules: ⊦ groupblock(gndx, lax, m).ladrlist = lax; (s)% ⊦ groupblock(gndx, lax, m).gndlist = gndx; (s)% ⊦ n ∈ crash(gstore, gstore0, ginval, nx) ↔ n ∈ gstore ∨ n ∈ ginval; (ws)%⊦ groupblock(gndx, lax, m) = groupblock(gndx0, lax0, m0) ↔ gndx = gndx0 ∧ lax = lax0 ∧ m = m0; (ws)