| 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 = mkfs(class, void_type, `initstate' .field) ', (addclass(class, (sk0 × val) ' + fis0, st)[r -- sk]) = st[r -- sk], sk = sk0, sk ∈ fis0 |
⊦ is_fskey(fv .1) ∧ fv .1 .fs .class ≠ class → addclass(class, fv ' + fis, st) = addclass(class, fis, st)
¬ (is_fskey((sk0 × val) .1) ∧ (sk0 × val) .1 .fs .class ≠ class), 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 = mkfs(class, void_type, `initstate' .field) ', (addclass(class, (sk0 × val) ' + fis0, st)[r -- sk]) = st[r -- sk], sk = sk0, sk ∈ fis0
is_fskey((sk0 × val) .1) ∧ (sk0 × val) .1 .fs .class ≠ class, 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 = mkfs(class, void_type, `initstate' .field) ', (addclass(class, fis0, st)[r -- sk]) = st[r -- sk], sk = sk0, sk ∈ fis0
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, fis0, sk0 × val, class)]]