| st[jvmref -- mkfs(class, ty, fieldvar) '] = refval(r), initdone(class, st), tdname∃(str, class), mkfs(class, ty, fieldvar) ' ∈ statfields(class), is_fskey(mkfs(class, ty, fieldvar) ') ∧ jvmref -- mkfs(class, ty, fieldvar) ' ∈ st ∧ type∃(str, mkfs(class, ty, fieldvar) ' .fs .type) ∧ mkfs(class, ty, fieldvar) ' .fs .type ≠ void_type ∧ validval(str, st[jvmref -- mkfs(class, ty, fieldvar) '], mkfs(class, ty, fieldvar) ' .fs .type, st) ⊦ validref(str, r, ty, st) |
st[jvmref -- mkfs(class, ty, fieldvar) '] = refval(r), initdone(class, st), tdname∃(str, class), mkfs(class, ty, fieldvar) ' ∈ statfields(class), jvmref -- mkfs(class, ty, fieldvar) ' ∈ st, type∃(str, ty), validval(str, refval(r), ty, st), jvmref ∈ st ⊦ ty = void_type, validref(str, r, ty, st)
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st], [CSIMPSEQ : ⊦ is_fskey(fs ')], [CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) .type = ty], [CSIMPSEQ : ⊦ fs ' .fs = fs])]]