| is_fskey(sk0), ∀ sk, class, st, r. sk = mkfs(class, void_type, `initstate' .field) ' ∨ (addclass(class, fis0, st)[r -- sk]) = st[r -- sk] ∨ sk ∈ fis0 ⊦ sk = sk0, (addclass(sk0 .fs .class, (sk0 × val) ' + fis0, st)[r -- sk]) = st[r -- sk], sk = mkfs(sk0 .fs .class, void_type, `initstate' .field) ', sk ∈ fis0 |
sk0 = fs ', is_fskey(sk0), ∀ sk, class, st, r. sk = mkfs(class, void_type, `initstate' .field) ' ∨ (addclass(class, fis0, st)[r -- sk]) = st[r -- sk] ∨ sk ∈ fis0 ⊦ sk = sk0, (addclass(fs .class, (sk0 × val) ' + fis0, st)[r -- sk]) = st[r -- sk], sk = mkfs(fs .class, void_type, `initstate' .field) ', sk ∈ fis0
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ is_fskey(sk) → (fs = sk .fs ↔ sk = fs ')])], [EXTRATERMS : (sk0, fs)]]