| ⊦ (addobj(r, class, fis, st)[r -- _length]) = st[r -- _length], _length ∈ fis |
⊦ ¬ sk ∈ fis ∧ sk ≠ _type → (addobj(r, class, fis, st)[r -- sk]) = st[r -- sk]
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ _type ≠ _length])], [EXTRATERMS : (_length, st, fis, class, r)]]