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