| is_reftype(ty0), validref(str, r, ty, st), validref(str, r1, ty0, st) ⊦ validref(str, r, ty, st[r0 -- mkfs(class, ty0, fieldvar) ', refval(r1)]) |
⊦ validref(str, r, ty0, st) ∧ validref(str, r1, ty, st) ∧ ty ≤ fs .type ∧ is_reftype(fs .type) → validref(str, r, ty0, st[r0 -- fs ', refval(r1)])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) .type = ty], [CSIMPSEQ : ⊦ ty ≤ ty])], [EXTRATERMS : (str, r, ty, st, r1, mkfs(class, ty0, fieldvar) .type, mkfs(class, ty0, fieldvar), r0)]]