| st[m0] = mkblock(x0, lax0, m4), st[n] = mkblock(x, lax, m3), @(m1, m2) ∈ lax0, m0 ∈ st, n ∈ st, @(m0, m1, m2) ∈ st[n, mkblock(x, lax, m)] ⊦ st[n, mkblock(x, lax, m)][@(m0, m1, m2).lnum].list [pos(@(@(m0, m1, m2).pos, @(m0, m1, m2).size), st[n, mkblock(x, lax, m)][@(m0, m1, m2).lnum].ladrlist) ] = x0[pos(@(m1, m2), lax0)] |
st[m0] = mkblock(x0, lax0, m4), st[n] = mkblock(x, lax, m3), m0 ∈ st, n ∈ st, @(m1, m2) ∈ lax0 ⊦ st[n, mkblock(x, lax, m)][m0].list[pos(@(m1, m2), st[n, mkblock(x, lax, m)][m0].ladrlist)] = x0[pos(@(m1, m2), lax0)]
Used simplifier rules: in-write-same: st[n].list = x, st[n].ladrlist = lax ⊦ n ∈ st → (adr ∈ st[n, mkblock(x, lax, m)] ↔ adr ∈ st);%in: ⊦ adr ∈ st ↔ adr.lnum ∈ st ∧ @(adr.pos, adr.size) ∈ st[adr.lnum].ladrlist;% ⊦ mkblock(x, lax, m).ladrlist = lax; (s)% ⊦ mkblock(x, lax, m).list = x; (s)% ⊦ @(m, m0, m1).size = m1; (s)% ⊦ @(m, m0, m1).pos = m0; (s)% ⊦ @(m, m0, m1).lnum = m; (s)