| fits(st[r -- sk] .refval, sks0, st), is_referencevalue(st[r -- sk]), st0 ⊆ st, ∀ st0, st, r, str. st0 ⊆ st ∧ fits(r, sks0, st) → junkref(str, r, st0) ∨ fits(r, sks0, st0), is_arraytype(st[r -- _type] .type) → is_indexkey(sk) ∧ 0 ≤ sk .index ∧ sk .index < st[r -- _length] .intval, is_classtype(st[r -- _type] .type) → sk ∈ instfields(st[r -- _type] .type .class) ⊦ r = jvmref, fits(r, sk ' + sks0, st0), junkref(str, r, st0) |
st[r -- sk] = refval(r0), fits(r0, sks0, st), is_referencevalue(st[r -- sk]), st0 ⊆ st, ∀ st0, st, r, str. st0 ⊆ st ∧ fits(r, sks0, st) → junkref(str, r, st0) ∨ fits(r, sks0, st0), is_arraytype(st[r -- _type] .type) → is_indexkey(sk) ∧ 0 ≤ sk .index ∧ sk .index < st[r -- _length] .intval, is_classtype(st[r -- _type] .type) → sk ∈ instfields(st[r -- _type] .type .class) ⊦ r = jvmref, fits(r, sk ' + sks0, st0), junkref(str, r, st0)
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ is_referencevalue(val) → ( r = val .refval ↔ val = refval(r))])], [EXTRATERMS : (st[r -- sk], r0)]]