| @(m, m0, m1) ∈ st ⊦ (st -- n)[@(m, m0, m1)] = st[@(m, m0, m1)], n = m |
m ∈ st, @(m0, m1) ∈ st[m].ladrlist ⊦ (st -- n)[@(m, m0, m1)] = st[m].list[pos(@(m0, m1), st[m].ladrlist)], n = m
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;% ⊦ @(m, m0, m1).size = m1; (s)% ⊦ @(m, m0, m1).pos = m0; (s)% ⊦ @(m, m0, m1).lnum = m; (s)