| sk .fs = mkfs(class1, ty, fieldvar), is_fskey(sk), ∀ r, class1, st. newref(r, addclass(class1, fis0, st)) ↔ newref(r, st) ⊦ newref(r, addclass(class1, (sk × val) ' + fis0, st)) ↔ newref(r, st) |
sk = fs ', fs = mkfs(class1, ty, fieldvar), is_fskey(sk), ∀ r, class1, st. newref(r, addclass(class1, fis0, st)) ↔ newref(r, st) ⊦ newref(r, addclass(class1, (sk × val) ' + fis0, st)) ↔ newref(r, st)
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ is_fskey(sk) → (fs = sk .fs ↔ sk = fs ')])], [EXTRATERMS : (sk, fs)]]