| ⊦ r0 = r, (addobj(r0, class0, fis0, st)[r0 -- sk]) = (addobj(r0, class0, fis0, addobj(r, class, fis, st))[r0 -- sk]) |
⊦ sk ∈ fis → (addobj(r, class, fis, st)[r -- sk]) = fis[sk]
¬ sk ∈ fis0 ⊦ r0 = r, (addobj(r0, class0, fis0, st)[r0 -- sk]) = (addobj(r0, class0, fis0, addobj(r, class, fis, st))[r0 -- sk])
⊦ sk ∈ fis → (addobj(r, class, fis, st)[r -- sk]) = fis[sk]
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (sk, st, fis0, class0, r0)]]