| st[r -- sks1] = refval(r1), fits(r2, i ' ', st), fits(r, sks1 + mkfs(class, ty, fieldvar) ' ', st) ⊦ (st[r1 -- mkfs(class, ty, fieldvar) ', val][r2 -- i ', val0]) = (st[r2 -- i ', val0][(st[r2 -- i ', val0][r -- sks1]) .refval -- mkfs(class, ty, fieldvar) ', val]), is_referencevalue(st[r2 -- i ']), is_reftype(ty), is_referencevalue(val0), is_referencevalue(val), junkref(str, r2, st), junkref(str, r, st) |
⊦ fits(r, sk ', st) ↔ r ≠ jvmref ∧ is_referencevalue(st[r -- sk]) ∧ (is_classtype(st[r -- _type] .type) → sk ∈ instfields(st[r -- _type] .type .class)) ∧ (is_arraytype(st[r -- _type] .type) → is_indexkey(sk) ∧ 0 ≤ sk .index ∧ sk .index < st[r -- _length] .intval)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, i ', r2)]]