| st[r -- sks1] = refval(r1), fits(r0, sks + i ' ', st), fits(r, sks1 + mkfs(class, ty, fieldvar) ' ', st) ⊦ (st[r1 -- mkfs(class, ty, fieldvar) ', val][(st[r1 -- mkfs(class, ty, fieldvar) ', val][r0 -- sks]) .refval -- i ', val0]) = (st[st[r0 -- sks] .refval -- i ', val0][r -- (sks1 + mkfs(class, ty, fieldvar) ' '), val]), is_referencevalue(val), is_referencevalue(val0), is_reftype(ty), is_referencevalue(st[r0 -- (sks + i ' ')]), junkref(str, r, st), junkref(str, r0, st) |
⊦ ¬ is_referencevalue(st[r -- sks]) ∧ ¬ junkref(str, r, st) → ¬ fits(r, sks + sk ', st)
st[r0 -- sks] = refval(r2) ∧ is_referencevalue(st[r0 -- sks]), st[r -- sks1] = refval(r1), fits(r0, sks + i ' ', st), fits(r, sks1 + mkfs(class, ty, fieldvar) ' ', st) ⊦ (st[r1 -- mkfs(class, ty, fieldvar) ', val][(st[r1 -- mkfs(class, ty, fieldvar) ', val][r0 -- sks]) .refval -- i ', val0]) = (st[r2 -- i ', val0][r -- (sks1 + mkfs(class, ty, fieldvar) ' '), val]), is_referencevalue(val), is_referencevalue(val0), is_reftype(ty), is_referencevalue(st[r0 -- (sks + i ' ')]), junkref(str, r, st), junkref(str, r0, st)
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : valuefuns, , refval-xtra, ⊦ ¬ is_referencevalue(val) → val .refval = jvmref], [CSIMPNAMEDSEQ : list, storekeys, a, ⊦ (sks + sks0) + sks1 = sks + sks0 + sks1], [CSIMPELIM : is_referencevalue(val) ⊦ r = val .refval ↔ val = refval(r)])], [EXTRATERMS : (st[r0 -- sks], r2)]]