| fis .keys = instfields(class), validfieldinits(fis, st), sk ∈ instfields(class) ⊦ r = jvmref, ¬ is_indexkey(sk) ∧ (sk ∈ fis ∨ sk = _type ∨ r -- sk ∈ st) ∧ okval(addobj(r, class, fis, st)[r -- sk], sk .fs .type) |
sk .fs = mkfs(class0, ty, fieldvar), fis .keys = instfields(class), validfieldinits(fis, st), sk ∈ instfields(class) ⊦ r = jvmref, ¬ is_indexkey(sk) ∧ (sk ∈ fis ∨ sk = _type ∨ r -- sk ∈ st) ∧ okval(addobj(r, class, fis, st)[r -- sk], ty)
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ class = fs .class ∧ ty = fs .type ∧ fieldvar = fs .field ↔ fs = mkfs(class, ty, fieldvar)])], [EXTRATERMS : (sk .fs, class0, ty, fieldvar)]]