| is_fskey(sk), ∀ class1, i, val, fis1, st. addclass(class1, fis0 + (i ' × val) ' + fis1, st) = addclass(class1, fis0 + fis1, st) ⊦ addclass(class1, fis0 + (i ' × val) ' + fis1, st) = addclass(class1, fis0 + fis1, st), sk .fs .class = class1 |
sk = fs ', is_fskey(sk), ∀ class1, i, val, fis1, st. addclass(class1, fis0 + (i ' × val) ' + fis1, st) = addclass(class1, fis0 + fis1, st) ⊦ addclass(class1, fis0 + (i ' × val) ' + fis1, st) = addclass(class1, fis0 + fis1, st), fs .class = class1
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ is_fskey(sk) → (fs = sk .fs ↔ sk = fs ')])], [EXTRATERMS : (sk, fs)]]