| okval(val, st[r1 -- _type] .type .type), mkfs(class, ty, fieldvar) ' ∈ statfields(class), tdname∃(str, class), initdone(class, st), validfield(str, jvmref, mkfs(class, ty, fieldvar) ', st) ⊦ is_referencevalue(val), validfield(str, jvmref, mkfs(class, ty, fieldvar) ', st[r1 -- i ', val]) |
⊦ 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))
okval(val, st[r1 -- _type] .type .type), mkfs(class, ty, fieldvar) ' ∈ statfields(class), tdname∃(str, class), initdone(class, st), validfield(str, jvmref, mkfs(class, ty, fieldvar) ', st) ⊦ is_referencevalue(val), goodfieldandtype(jvmref, mkfs(class, ty, fieldvar) ', st[r1 -- i ', val]) ∧ type∃(str, mkfs(class, ty, fieldvar) ' .fs .type) ∧ mkfs(class, ty, fieldvar) ' .fs .type ≠ void_type ∧ ( is_reftype(mkfs(class, ty, fieldvar) ' .fs .type) → validrefval(str, st[r1 -- i ', val][jvmref -- mkfs(class, ty, fieldvar) '], mkfs(class, ty, fieldvar) ' .fs .type, st[r1 -- i ', val]))
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st[r1 -- i ', val], mkfs(class, ty, fieldvar) ', jvmref, str)]]