| sk ∈ fis ⊦ addobj(r, class1, fis + (sk × val) ' + fis0, st) = addobj(r, class1, fis + fis0, st) |
⊦ st1 = st2 ↔ (∀ rk. (rk ∈ st1 ↔ rk ∈ st2) ∧ st1[rk] = st2[rk])
sk ∈ fis ⊦ ∀ rk. (rk ∈ addobj(r, class1, fis + (sk × val) ' + fis0, st) ↔ rk ∈ addobj(r, class1, fis + fis0, st)) ∧ (addobj(r, class1, fis + (sk × val) ' + fis0, st)[rk]) = (addobj(r, class1, fis + fis0, st)[rk])
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (addobj(r, class1, fis + fis0, st), addobj(r, class1, fis + (sk × val) ' + fis0, st))]]