| oktype(val, fs .type, st), goodfieldsandtypes(r, sks, st) ⊦ fs ' = _type, goodfieldsandtypes(r, sks, st[r0 -- fs ', val]) |
⊦ ¬ goodfieldsandtypes(r, sks, st[r0 -- mkfs(class0, ty, fieldvar) ', val]) ∧ mkfs(class0, ty, fieldvar) ' ≠ _type ∧ oktype(val, ty, st) → ¬ goodfieldsandtypes(r, sks, st)
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ class = fs .class ∧ ty = fs .type ∧ fieldvar = fs .field ↔ fs = mkfs(class, ty, fieldvar)])], [EXTRATERMS : (fs, class, ty, fieldvar)]]