| is_obj(str, r, st), acc .first = st[r -- fs0 '] .refval, st[r -- _type] .type ≤ ty, fs0 ' ∈ instfields(st[r -- _type] .type .class), is_referencevalue(st[r -- fs0 ']), validrefs(str, acc, fs0 .type, st), is_arraytype(st[r0 -- _type] .type), is_obj(str, r, st), junkref(str, acc .first, st) ⊦ fs ' = _type, fs ' = _length, r = jvmref, acc = [], r = r0, junkref(str, r, st[r0 -- fs ', val]), ∃ fs. fs ' ∈ instfields(st[r -- _type] .type .class) ∧ is_referencevalue(st[r -- fs ']) ∧ st[r -- fs '] .refval ≠ jvmref ∧ (¬ st[st[r -- fs '] .refval -- _type] .type ≤ fs .type ∨ junkref(str, st[r -- fs '] .refval, st)), dups(acc .butlast), r ∈ acc .butlast, validrefs(str, acc, fs0 .type, st[r0 -- fs ', val]) |
acc = r1 + refs, is_obj(str, r, st), r1 = st[r -- fs0 '] .refval, st[r -- _type] .type ≤ ty, fs0 ' ∈ instfields(st[r -- _type] .type .class), is_referencevalue(st[r -- fs0 ']), validrefs(str, acc, fs0 .type, st), is_arraytype(st[r0 -- _type] .type), is_obj(str, r, st), junkref(str, r1, st) ⊦ fs ' = _type, fs ' = _length, r = jvmref, acc = [], r = r0, junkref(str, r, st[r0 -- fs ', val]), ∃ fs. fs ' ∈ instfields(st[r -- _type] .type .class) ∧ is_referencevalue(st[r -- fs ']) ∧ st[r -- fs '] .refval ≠ jvmref ∧ (¬ st[st[r -- fs '] .refval -- _type] .type ≤ fs .type ∨ junkref(str, st[r -- fs '] .refval, st)), dups(acc .butlast), r ∈ acc .butlast, validrefs(str, acc, fs0 .type, st[r0 -- fs ', val])
[[CONCRETESIMPRULES : ([CSIMPELIM : refs ≠ [] ⊦ r = refs .first ∧ refs0 = refs .rest ↔ refs = r + refs0])], [EXTRATERMS : (acc, r1, refs)]]