| ∀ r, r0, class1, st. r ∈ addobj(r0, class1, fis0, st) ↔ r = r0 ∨ r ∈ st ⊦ r ∈ addobj(r0, class1, fv ' + fis0, st) ↔ r = r0 ∨ r ∈ st |
⊦ (∀ r, r0, class1, st. r ∈ addobj(r0, class1, fis0, st) ↔ r = r0 ∨ r ∈ st) → (r ∈ addobj(r0, class1, (sk × val) ' + fis0, st) ↔ r = r0 ∨ r ∈ st)
[[CONCRETESIMPRULES : ([CSIMPGEN : fieldvalue generated by ×;])]]