| validref(str, r, ty, st), is_fskey(sk), is_referencevalue(val) → validref(str, val .refval, sk .fs .type, st) ∧ is_reftype(sk .fs .type), ¬ is_referencevalue(val) → okval(val, sk .fs .type) ∧ sk .fs .type ≠ void_type ∧ sk ≠ _length ⊦ validref(str, r, ty, st[r0 -- sk, val]) |
sk = fs ', validref(str, r, ty, st), is_fskey(sk), is_referencevalue(val) → validref(str, val .refval, fs .type, st) ∧ is_reftype(fs .type), ¬ is_referencevalue(val) → okval(val, fs .type) ∧ fs .type ≠ void_type ∧ sk ≠ _length ⊦ validref(str, r, ty, st[r0 -- sk, val])
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ is_fskey(sk) → (fs = sk .fs ↔ sk = fs ')])], [EXTRATERMS : (sk, fs)]]