| ⊦ r = r0, r0 -- fs ' ∈ st ∧ oktype(st[r0 -- fs '], fs .type, addarray(r, ty, vals, st)) ↔ goodfieldandtype(r0, fs ', st) |
fs = mkfs(class, ty0, fieldvar) ⊦ r = r0, r0 -- fs ' ∈ st ∧ oktype(st[r0 -- fs '], ty0, addarray(r, ty, vals, st)) ↔ goodfieldandtype(r0, fs ', st)
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ class = fs .class ∧ ty = fs .type ∧ fieldvar = fs .field ↔ fs = mkfs(class, ty, fieldvar)])], [EXTRATERMS : (fs, class, ty0, fieldvar)]]