| r -- sk ∈ addclass(class, fv ' + fis0, st), is_indexkey(sk), r ∈ addclass(class, fv ' + fis0, st), is_fskey(fv .1), ∀ sk0, r0, class0, st0. ¬ is_fskey(sk0) → (r0 -- sk0 ∈ addclass(class0, fis0, st0) → r0 -- sk0 ∈ st0) ⊦ r -- sk ∈ st |
fv = sk1 × val, r -- sk ∈ addclass(class, fv ' + fis0, st), is_indexkey(sk), r ∈ addclass(class, fv ' + fis0, st), is_fskey(sk1), ∀ sk0, r0, class0, st0. ¬ is_fskey(sk0) → (r0 -- sk0 ∈ addclass(class0, fis0, st0) → r0 -- sk0 ∈ st0) ⊦ r -- sk ∈ st
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ sk = fv .1 ∧ val = fv .2 ↔ fv = sk × val])], [EXTRATERMS : (fv, sk1, val)]]