| st[n].ladrlist = lax, st[n].list = x, n ∈ st, adr ∈ st ⊦ st[n, mkblock(x, lax, m)][adr] = st[adr] |
n ∈ st, adr.lnum ∈ st, @(adr.pos, adr.size) ∈ st[adr.lnum].ladrlist ⊦ st[n, mkblock(st[n].list, st[n].ladrlist, m)][adr] = st[adr.lnum].list[pos(@(adr.pos, adr.size), st[adr.lnum].ladrlist)]
Used simplifier rules: at: ⊦ adr ∈ st → st[adr] = st[adr.lnum].list [pos(@(adr.pos, adr.size), st[adr.lnum].ladrlist) ];%in: ⊦ adr ∈ st ↔ adr.lnum ∈ st ∧ @(adr.pos, adr.size) ∈ st[adr.lnum].ladrlist;