| (r1 ' + refs2) .last = (r2 ' + refs1) .last, st[r2 -- sks] = refval((r2 ' + refs1) .last), fits(r2, sks, st), validrefs(str, r2 ' + refs1, st[r2 -- _type] .type, st), validrefs(str, r1 ' + refs2, st[r1 -- _type] .type, st), r2 ∈ refs, r1 ∈ refs, validreflist(str, mkjavavalues(refs), mkclasstype(`java.lang.Object' .class), st), ∀ r, sks, r0, sks0. ¬ r ∈ refs ∨ ¬ r0 ∈ refs ∨ r = r0 ∨ ¬ fits(r, sks, st) ∨ ¬ fits(r0, sks0, st) ∨ st[r -- sks] ≠ st[r0 -- sks0] ∨ st[r -- sks] .refval = jvmref ⊦ (r2 ' + refs1) .last = jvmref, r1 = r2 |
validrefs(str, refs, ty, st), refs ≠ [] ⊦ ∃ sks. fits(refs .first, sks, st) ∧ st[refs .first -- sks] .refval = refs .last
∃ sks. fits((r1 ' + refs2) .first, sks, st) ∧ st[(r1 ' + refs2) .first -- sks] .refval = (r1 ' + refs2) .last, (r1 ' + refs2) .last = (r2 ' + refs1) .last, st[r2 -- sks] = refval((r2 ' + refs1) .last), fits(r2, sks, st), validrefs(str, r2 ' + refs1, st[r2 -- _type] .type, st), validrefs(str, r1 ' + refs2, st[r1 -- _type] .type, st), r2 ∈ refs, r1 ∈ refs, validreflist(str, mkjavavalues(refs), mkclasstype(`java.lang.Object' .class), st), ∀ r, sks, r0, sks0. ¬ r ∈ refs ∨ ¬ r0 ∈ refs ∨ r = r0 ∨ ¬ fits(r, sks, st) ∨ ¬ fits(r0, sks0, st) ∨ st[r -- sks] ≠ st[r0 -- sks0] ∨ st[r -- sks] .refval = jvmref ⊦ (r2 ' + refs1) .last = jvmref, r1 = r2
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ refs + refs0 ≠ [] ↔ refs = [] ∧ refs0 = []], [CSIMPSEQ : ⊦ r ' ≠ []], [CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1])], [EXTRATERMS : (str, r1 ' + refs2, st[r1 -- _type] .type, st)]]