| (st[r1 -- i ', val][r -- i0 ']) = refval(r2), junkrefs(str, r2 ' + refs, st[r -- _type] .type .type, st[r1 -- i ', val]), i0 < st[r -- _length] .intval, okval(val, st[r1 -- _type] .type .type), is_array(str, r, st), st[r -- _type] .type ≤ ty, is_array(str, r, st[r1 -- i ', val]), 0 < st[r -- _length] .intval, 0 ≤ i0, ∀ val0, st0, r0, str0, ty0, i1. okval(val0, st0[r0 -- _type] .type .type) ∧ junkrefs(str0, r2 ' + refs, ty0, st0[r0 -- i1 ', val0]) → is_referencevalue(val0) ∨ junkrefs(str0, r2 ' + refs, ty0, st0) ⊦ r -- i0 ' = r1 -- i ', r = jvmref, junkrefs(str, r ' + r2 ' + refs, ty, st), is_referencevalue(val) |
st[r -- i0 '] = refval(r2), junkrefs(str, r2 ' + refs, st[r -- _type] .type .type, st[r1 -- i ', val]), i0 < st[r -- _length] .intval, okval(val, st[r1 -- _type] .type .type), is_array(str, r, st), st[r -- _type] .type ≤ ty, is_array(str, r, st[r1 -- i ', val]), 0 < st[r -- _length] .intval, 0 ≤ i0, ∀ val0, st0, r0, str0, ty0, i1. okval(val0, st0[r0 -- _type] .type .type) ∧ junkrefs(str0, r2 ' + refs, ty0, st0[r0 -- i1 ', val0]) → is_referencevalue(val0) ∨ junkrefs(str0, r2 ' + refs, ty0, st0), r ≠ r1 ∨ i0 ≠ i ⊦ r = jvmref, junkrefs(str, r ' + r2 ' + refs, ty, st), is_referencevalue(val)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPSEQ : ⊦ i ' = i0 ' ↔ i = i0], [CSIMPSEQ : ⊦ r -- sk = r0 -- sk0 ↔ ¬ ¬ (r = r0 ∧ sk = sk0)], [CSIMPSEQ : ⊦ rk ≠ rk0 → (st[rk0, val][rk]) = st[rk]])]]