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