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