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