| st[r1 -- i '] = refval(r2), 0 < st[r1 -- _length] .intval, 0 ≤ i, junkrefs(str, r2 ' + refs, st[r1 -- _type] .type .type, st[r -- mkfs(class, ty0, fieldvar) ', refval(r0)]), i < st[r1 -- _length] .intval, mkfs(class, ty0, fieldvar) ' ∈ instfields(st[r -- _type] .type .class), st[r0 -- _type] .type ≤ ty0, is_obj(r, st), st[r1 -- _type] .type ≤ ty, is_array(str, r1, st), ∀ str0, ty1, st0, r3, r4, fs. ¬ junkrefs(str0, r2 ' + refs, ty1, st0) ∧ ¬ junkref(str0, r3, st0) ∧ is_obj(r4, st0) ∧ st0[r3 -- _type] .type ≤ fs .type ∧ r3 ≠ jvmref ∧ fs ' ∈ instfields(st0[r4 -- _type] .type .class) → ¬ junkrefs(str0, r2 ' + refs, ty1, st0[r4 -- fs ', refval(r3)]) ⊦ r0 = jvmref, r1 = jvmref, r = r1, junkref(str, r0, st), junkrefs(str, r2 ' + refs, st[r1 -- _type] .type .type, st), r ≠ r2 ∧ ¬ r ∈ refs |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) .type = ty])], [EXTRATERMS : (str, st[r1 -- _type] .type .type, st, r0, r, mkfs(class, ty0, fieldvar))]]