| st[r -- _type] = typeval(mkclasstype(class0)), r ∈ st, r -- _type ∈ st, okval(val, ty), fs ' ∈ instfields(class0), r -- fs ' ∈ st, okval(st[r -- fs '], fs .type) ⊦ r = jvmref, ty = void_type, okval(st[r1 -- mkfs(class, ty, fieldvar) ', val][r -- fs '], fs .type) |
fs = mkfs(class1, ty0, fieldvar0), st[r -- _type] = typeval(mkclasstype(class0)), r ∈ st, r -- _type ∈ st, okval(val, ty), fs ' ∈ instfields(class0), r -- fs ' ∈ st, okval(st[r -- fs '], ty0) ⊦ r = jvmref, ty = void_type, okval(st[r1 -- mkfs(class, ty, fieldvar) ', val][r -- fs '], ty0)
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ class = fs .class ∧ ty = fs .type ∧ fieldvar = fs .field ↔ fs = mkfs(class, ty, fieldvar)])], [EXTRATERMS : (fs, class1, ty0, fieldvar0)]]