| sk ∈ (sk0 × val0) ' + fis0, ∀ sk, r, st, val. sk ∈ fis0 → update(r, fis0, st[r -- sk, val]) = update(r, fis0, st) ⊦ (update(r, fis0, st[r -- sk, val])[r -- (sk0 × val0) .1, (sk0 × val0) .2]) = (update(r, fis0, st)[r -- (sk0 × val0) .1, (sk0 × val0) .2]) |
sk ∈ (sk0 × val0) ' + fis0, ∀ sk, r, st, val. sk ∈ fis0 → update(r, fis0, st[r -- sk, val]) = update(r, fis0, st) ⊦ (update(r, fis0, st[r -- sk, val])[r -- sk0, val0]) = (update(r, fis0, st)[r -- sk0, val0])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (sk × val) .2 = val], [CSIMPSEQ : ⊦ (sk × val) .1 = sk])]]