| ∀ r, r0, st. r ∈ update(r0, fis0, st) ↔ r ∈ st ∨ r = r0 ∧ fis0 ≠ [] ⊦ r ∈ (update(r0, fis0, st)[r0 -- fv .1, fv .2]) ↔ r ∈ st ∨ r = r0 |
fv = sk × val, ∀ r, r0, st. r ∈ update(r0, fis0, st) ↔ r ∈ st ∨ r = r0 ∧ fis0 ≠ [] ⊦ r ∈ (update(r0, fis0, st)[r0 -- sk, val]) ↔ r ∈ st ∨ r = r0
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ sk = fv .1 ∧ val = fv .2 ↔ fv = sk × val])], [EXTRATERMS : (fv, sk, val)]]