| okval(val, ty0), validref(str, r, ty, st) ⊦ ty0 = void_type, mkfs(class, ty0, fieldvar) ' = _length, is_referencevalue(val), validref(str, r, ty, st[r1 -- mkfs(class, ty0, fieldvar) ', val]) |
⊦ ¬ is_referencevalue(val) ∧ validref(str, r, ty, st) ∧ is_fskey(sk) ∧ oktype(val, sk .fs .type, st) ∧ sk .fs .type ≠ void_type ∧ sk ≠ _length → validref(str, r, ty, st[r1 -- sk, val])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_fskey(fs ')], [CSIMPSEQ : ⊦ fs ' .fs = fs], [CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) .type = ty], [CSIMPSEQ : ⊦ oktype(val, ty, st) ↔ okval(val, ty)])], [EXTRATERMS : (val, mkfs(class, ty0, fieldvar) ', r1, st, ty, r, str)]]