| 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])) |
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) ⊦ ty = void_type, is_referencevalue(val), (is_reftype(ty) → validrefval(str, st[jvmref -- mkfs(class, ty, fieldvar) '], ty, st[r1 -- i ', val])) ∧ type∃(str, ty) ∧ goodfieldandtype(jvmref, mkfs(class, ty, fieldvar) ', st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ mkfs (class0, void_type, fieldvar) ' ∈ statfields(class)], [CSIMPSEQ : ⊦ (st[r -- i ', val][r0 -- fs ']) = st[r0 -- fs ']], [CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) .type = ty], [CSIMPSEQ : ⊦ fs ' .fs = fs], [CSIMPSEQ : ⊦ goodfieldandtype (r, sk, st[r0 -- i ', val]) ↔ goodfieldandtype(r, sk, st)])]]