| ∀ r, i, class1, st. r -- i ' ∈ addclass(class1, fis0, st) ↔ r -- i ' ∈ st ⊦ r -- i ' ∈ addclass(class1, fv + fis0, st) ↔ r -- i ' ∈ st |
⊦ rk ∈ st → rk ∈ addclass(class, fis, st)
r -- i ' ∈ addclass(class1, fv ' + fis0, st), r ∈ addclass(class1, fv ' + fis0, st), ∀ r0, i0, class, st0. r0 -- i0 ' ∈ addclass(class, fis0, st0) → r0 -- i0 ' ∈ st0 ⊦ r -- i ' ∈ st
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st], [CSIMPSEQ : ⊦ fv + fis = fv ' + fis])]]