| ∀ r, r1, class, class1, fis1, st. r = r1 ∨ (instore(r, class, fis0, addobj(r1, class1, fis1, st)) ↔ instore(r, class, fis0, st)) ⊦ r = r1, r -- fv .1 ∈ st ∧ st[r -- fv .1] = fv .2 ∧ instore(r, class, fis0, addobj(r1, class1, fis1, st)) ↔ instore(r, class, fv ' + fis0, st) |
fv = sk × val, ∀ r, r1, class, class1, fis1, st. r = r1 ∨ (instore(r, class, fis0, addobj(r1, class1, fis1, st)) ↔ instore(r, class, fis0, st)) ⊦ r = r1, r -- sk ∈ st ∧ st[r -- sk] = val ∧ instore(r, class, fis0, addobj(r1, class1, fis1, st)) ↔ instore(r, class, fv ' + fis0, st)
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ sk = fv .1 ∧ val = fv .2 ↔ fv = sk × val])], [EXTRATERMS : (fv, sk, val)]]