| okval(st[r1 -- mkfs(class, ty, fieldvar) '], ty), r1 -- mkfs(class, ty, fieldvar) ' ∈ st, okval(val, ty), r1 ∈ st, junkrefs(str, r ' + refs0, st[r -- _type] .type, st) ⊦ mkfs(class, ty, fieldvar) ' = _length, ty = void_type, is_referencevalue(val), r ' + refs0 ≠ [] ∧ (r ' + refs0) .first = r ∧ junkrefs(str, r ' + refs0, st[(r ' + refs0) .first -- _type] .type, st[r1 -- mkfs(class, ty, fieldvar) ', val]) |
okval(st[r1 -- mkfs(class, ty, fieldvar) '], ty), r1 -- mkfs(class, ty, fieldvar) ' ∈ st, okval(val, ty), r1 ∈ st, junkrefs(str, r ' + refs0, st[r -- _type] .type, st) ⊦ mkfs(class, ty, fieldvar) ' = _length, ty = void_type, is_referencevalue(val), junkrefs(str, r ' + refs0, st[r -- _type] .type, st[r1 -- mkfs(class, ty, fieldvar) ', val])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (r ' + refs) .first = r], [CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPSEQ : ⊦ r ' ≠ []], [CSIMPSEQ : ⊦ ¬ refs + refs0 ≠ [] ↔ refs = [] ∧ refs0 = []])]]