| r -- _type ∈ st ∧ (∀ sk. sk ∈ sks → goodfieldandtype(r, sk, st)), st[r -- _type] = typeval(mkclasstype(class)) ⊦ r -- _type ∈ addclass(class0, fis, st) ∧ (∀ sk. sk ∈ sks → goodfieldandtype(r, sk, addclass(class0, fis, st))), r = jvmref, class = class0 |
⊦ rk ∈ st → rk ∈ addclass(class, fis, st)
st[r -- _type] = typeval(mkclasstype(class)), r -- _type ∈ st, sk ∈ sks, r ∈ st, ∀ sk. sk ∈ sks → goodfieldandtype(r, sk, st) ⊦ r = jvmref, class = class0, goodfieldandtype(r, sk, addclass(class0, fis, st))
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st])]]