| initundone(class1, addclass(class1, (sk × val) ' + fis0, st)), is_fskey(sk), ∀ class1, st. initundone(class1, addclass(class1, fis0, st)) → mkfs(class1, void_type, `initstate' .field) ' ∈ fis0 ⊦ mkfs(class1, void_type, `initstate' .field) ' = sk, mkfs(class1, void_type, `initstate' .field) ' ∈ fis0, ¬ is_indexkey(sk) ∧ sk .fs .class ≠ class1 |
sk = fs ', initundone(class1, addclass(class1, (sk × val) ' + fis0, st)), is_fskey(sk), ∀ class1, st. initundone(class1, addclass(class1, fis0, st)) → mkfs(class1, void_type, `initstate' .field) ' ∈ fis0 ⊦ mkfs(class1, void_type, `initstate' .field) ' = sk, mkfs(class1, void_type, `initstate' .field) ' ∈ fis0, ¬ is_indexkey(sk) ∧ fs .class ≠ class1
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ is_fskey(sk) → (fs = sk .fs ↔ sk = fs ')])], [EXTRATERMS : (sk, fs)]]