| sk .fs = mkfs(class, ty, fieldvar) ⊦ validfield(str, r, sk, st) ↔ ¬ is_indexkey(sk) ∧ r -- sk ∈ st ∧ type∃(str, ty) ∧ ty ≠ void_type ∧ validval(str, st[r -- sk], ty, st) |
⊦ validfield(str, r, sk, st) ↔ goodfieldandtype(r, sk, st) ∧ type∃(str, sk .fs .type) ∧ sk .fs .type ≠ void_type ∧ (is_reftype(sk .fs .type) → validrefval(str, st[r -- sk], sk .fs .type, st))
sk .fs = mkfs(class, ty, fieldvar) ⊦ goodfieldandtype(r, sk, st) ∧ type∃(str, sk .fs .type) ∧ sk .fs .type ≠ void_type ∧ (is_reftype(sk .fs .type) → validrefval(str, st[r -- sk], sk .fs .type, st)) ↔ ¬ is_indexkey(sk) ∧ r -- sk ∈ st ∧ type∃(str, ty) ∧ ty ≠ void_type ∧ validval(str, st[r -- sk], ty, st)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, sk, r, str)]]