| ⊦ goodfieldandtype(r, mkfs(class1, ty, fieldvar) ', st) ↔ r -- mkfs(class1, ty, fieldvar) ' ∈ st ∧ okval(st[r -- mkfs(class1, ty, fieldvar) '], ty) |
⊦ goodfieldandtype(r, mkfs(class1, ty, fieldvar) ', st) ↔ r -- mkfs(class1, ty, fieldvar) ' ∈ st ∧ oktype(st[r -- mkfs(class1, ty, fieldvar) '], ty, st)
⊦ oktype(val, ty, st) ↔ okval(val, ty)
[[CONCRETESIMPRULES : ()]]