| ∀ sk, r, class, st. ¬ is_fskey(sk) → (r -- sk ∈ addclass(class, fis0, st) ↔ r -- sk ∈ st) ⊦ ¬ is_fskey(sk) → (r -- sk ∈ addclass(class, fv + fis0, st) ↔ r -- sk ∈ st) |
⊦ rk ∈ st → rk ∈ addclass(class, fis, st)
r -- sk ∈ addclass(class, fv ' + fis0, st), is_indexkey(sk), r ∈ addclass(class, fv ' + fis0, st), ∀ sk0, r0, class0, st0. ¬ is_fskey(sk0) → (r0 -- sk0 ∈ addclass(class0, fis0, st0) → r0 -- sk0 ∈ st0) ⊦ r -- sk ∈ st
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st], [CSIMPSEQ : ⊦ ¬ is_fskey(sk) ↔ is_indexkey(sk)], [CSIMPSEQ : ⊦ fv + fis = fv ' + fis])]]