| acc .first = (st[r -- i ', refval(jvmref)][r0 -- i0 ']) .refval, is_reftype(st[r -- _type] .type .type), is_array(str, r0, st[r -- i ', refval(jvmref)]), st[r0 -- _type] .type ≤ ty, is_array(str, r0, st), i0 < st[r0 -- _length] .intval, is_referencevalue(st[r -- i ', refval(jvmref)][r0 -- i0 ']), junkrefs(str, acc, st[r0 -- _type] .type .type, st[r -- i ', refval(jvmref)]), 0 ≤ i0, 0 < st[r0 -- _length] .intval, ∀ st, r, str, ty, i. is_reftype(st[r -- _type] .type .type) ∧ junkrefs(str, acc, ty, st[r -- i ', refval(jvmref)]) → r = jvmref ∨ junkrefs(str, acc, ty, st) ⊦ r0 = jvmref, r = jvmref, acc = [], junkrefs(str, r0 ' + acc, ty, st) |
acc = r1 + refs, r1 = (st[r -- i ', refval(jvmref)][r0 -- i0 ']) .refval, is_reftype(st[r -- _type] .type .type), is_array(str, r0, st[r -- i ', refval(jvmref)]), st[r0 -- _type] .type ≤ ty, is_array(str, r0, st), i0 < st[r0 -- _length] .intval, is_referencevalue(st[r -- i ', refval(jvmref)][r0 -- i0 ']), junkrefs(str, acc, st[r0 -- _type] .type .type, st[r -- i ', refval(jvmref)]), 0 ≤ i0, 0 < st[r0 -- _length] .intval, ∀ st, r, str, ty, i. is_reftype(st[r -- _type] .type .type) ∧ junkrefs(str, acc, ty, st[r -- i ', refval(jvmref)]) → r = jvmref ∨ junkrefs(str, acc, ty, st) ⊦ r0 = jvmref, r = jvmref, acc = [], junkrefs(str, r0 ' + acc, ty, st)
[[CONCRETESIMPRULES : ([CSIMPELIM : refs ≠ [] ⊦ r = refs .first ∧ refs0 = refs .rest ↔ refs = r + refs0])], [EXTRATERMS : (acc, r1, refs)]]