| r -- _type = r0 -- fs ', junkrefs(str, r ' + refs0, (st[r0 -- fs ', val][r -- _type]) .type, st[r0 -- fs ', val]) ⊦ junkref(str, r, st), is_typevalue(st[r0 -- _type]) ∧ is_reftype(st[r0 -- _type] .type) |
_type = fs ', junkrefs(str, r0 ' + refs0, val .type, st[r0 -- _type, val]) ⊦ junkref(str, r0, st), is_typevalue(st[r0 -- _type]) ∧ is_reftype(st[r0 -- _type] .type)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (st[rk, val][rk]) = val], [CSIMPSEQ : ⊦ r -- sk = r0 -- sk0 ↔ r = r0 ∧ sk = sk0])]]