| ¬ sk0 ∈ fis + fis0 ∧ sk0 ≠ _type, sk ∈ fis ⊦ (addobj(r0, class1, fis + (sk × val) ' + fis0, st)[r0 -- sk0]) = st[r0 -- sk0], sk0 ∈ fis0, sk0 ∈ fis |
sk ∈ fis ⊦ (addobj(r0, class1, fis + (sk × val) ' + fis0, st)[r0 -- sk0]) = st[r0 -- sk0], sk0 = _type, sk0 ∈ fis0, sk0 ∈ fis
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (fis + fis0) + fis1 = fis + fis0 + fis1], [CSIMPSEQ : ⊦ sk ∈ fis + fis0 ↔ sk ∈ fis ∨ sk ∈ fis0])]]