| st[n] = mkblock(x, lax, m), n ∈ st, n1 ∈ st0, n1 ∈ st[n, mkblock(x, lax, n0)], dom st0 ⊆ dom st, ∀ n. n ∈ st0 ∧ n ∈ st → st0[n].list ⊑ st[n].list ∧ st0[n].ladrlist ⊑ st[n].ladrlist ∧ # st0[n].list = # st0[n].ladrlist ∧ # st[n].list = # st[n].ladrlist ⊦ st0[n1].list ⊑ st[n, mkblock(x, lax, n0)][n1].list ∧ st0[n1].ladrlist ⊑ st[n, mkblock(x, lax, n0)][n1].ladrlist ∧ # st0[n1].list = # st0[n1].ladrlist ∧ # st[n, mkblock(x, lax, n0)][n1].list = # st[n, mkblock(x, lax, n0)][n1].ladrlist |
st[n] = mkblock(x, lax, m), st0[n1] = mkblock(x0, lax0, m0), n1 ∈ st[n, mkblock(x, lax, n0)], n1 ∈ st0, n ∈ st, dom st0 ⊆ dom st, ∀ n. n ∈ st0 ∧ n ∈ st → st0[n].list ⊑ st[n].list ∧ st0[n].ladrlist ⊑ st[n].ladrlist ∧ # st0[n].list = # st0[n].ladrlist ∧ # st[n].list = # st[n].ladrlist ⊦ x0 ⊑ st[n, mkblock(x, lax, n0)][n1].list ∧ lax0 ⊑ st[n, mkblock(x, lax, n0)][n1].ladrlist ∧ # x0 = # lax0 ∧ # st[n, mkblock(x, lax, n0)][n1].list = # st[n, mkblock(x, lax, n0)][n1].ladrlist
Used simplifier rules: ⊦ (x = ablock.list ∧ lax = ablock.ladrlist) ∧ m = ablock.ref-size ↔ ablock = mkblock(x, lax, m); (elim) Used terms: st0[n1], x0, lax0, m0