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