| (r2 ' + refs1) .last = refs .last, validrefs(str, refs, st1[refs .first -- _type] .type, st1), st ⊆ st1, newref(r, st), validrefs(str, r2 ' + refs1, st1[r2 -- _type] .type, st1), ∀ r0. path∃(str, r, r0, st1) → newref(r0, st) ∨ r0 = jvmref ⊦ r = jvmref, refs .last = jvmref, r2 = refs .first, refs = [], junkref(str, r1, st), r2 ≠ r ∧ r2 ≠ r1, refs .first ≠ r ∧ refs .first ≠ r1 |
refs = r3 + refs0, (r2 ' + refs1) .last = refs .last, validrefs(str, refs, st1[r3 -- _type] .type, st1), st ⊆ st1, newref(r, st), validrefs(str, r2 ' + refs1, st1[r2 -- _type] .type, st1), ∀ r0. path∃(str, r, r0, st1) → newref(r0, st) ∨ r0 = jvmref ⊦ r = jvmref, refs .last = jvmref, r2 = r3, refs = [], junkref(str, r1, st), r2 ≠ r ∧ r2 ≠ r1, r3 ≠ r ∧ r3 ≠ r1
[[CONCRETESIMPRULES : ([CSIMPELIM : refs ≠ [] ⊦ r = refs .first ∧ refs0 = refs .rest ↔ refs = r + refs0])], [EXTRATERMS : (refs, r3, refs0)]]