| fits(st[r -- sk] .refval, sks0, st), is_referencevalue(st[r -- sk]), st ⊆ st0, ∀ st, st0, r, str. st ⊆ st0 ∧ fits(r, sks0, st) → junkref(str, r, st) ∨ 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, st) |
st[r -- sk] = refval(r0), fits(r0, sks0, st), is_referencevalue(st[r -- sk]), st ⊆ st0, ∀ st, st0, r, str. st ⊆ st0 ∧ fits(r, sks0, st) → junkref(str, r, st) ∨ 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, st)
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ is_referencevalue(val) → ( r = val .refval ↔ val = refval(r))])], [EXTRATERMS : (st[r -- sk], r0)]]