| sk .fs = mkfs(class, ty, fieldvar), is_fskey(sk) ∧ r -- sk ∈ st ∧ okval(st[r -- sk], sk .fs .type), st ⊆ st0, type∃(str, ty), is_reftype(ty) → validrefval(str, st[r -- sk], ty, st) ⊦ ty = void_type, goodfieldandtype(r, sk, st0) ∧ (is_reftype(ty) → validrefval(str, st0[r -- sk], ty, st0)) |
sk .fs = mkfs(class, ty, fieldvar), r -- sk ∈ st, is_fskey(sk), r ∈ st, type∃(str, ty), st ⊆ st0, okval(st[r -- sk], ty), is_reftype(ty) → validrefval(str, st[r -- sk], ty, st) ⊦ ty = void_type, goodfieldandtype(r, sk, st0) ∧ (is_reftype(ty) → validrefval(str, st0[r -- sk], ty, st0))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) .type = ty], [CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st])]]