| st[r -- _type] = st1[r1 -- _type], st1[r1 -- _type] .type = mkclasstype(class), cyclic(str, r, st), is_obj(str, r1, st1), ∀ fs. fs ' ∈ instfields(class) ∧ ¬ is_referencevalue(st[r -- fs ']) → st[r -- fs '] = st1[r1 -- fs '], ∀ fs. fs ' ∈ instfields(class) ∧ is_referencevalue(st[r -- fs ']) → ps=(st[r -- fs '] .refval, st, st1[r1 -- fs '] .refval, st1), ∀ st, r, st0, r0, str0. maxpath(str0, r0, st0) < maxpath(str, r1, st1) → (ps=(r, st, r0, st0) ∧ cyclic(str0, r, st) → junkref(str0, r, st) ∨ junkref(str0, r0, st0) ∨ cyclic(str0, r0, st0)) ⊦ r1 = jvmref, r = jvmref, junkref(str, r, st), junkref(str, r1, st1), cyclic(str, r1, st1) |
⊦ cyclic(str, r, st) ↔ (∃ refs, r0. ¬ dups(refs) ∧ r0 ∈ refs ∧ refs .first = r ∧ validrefs(str, refs + r0 ', st[r -- _type] .type, st))
st[r -- _type] = st1[r1 -- _type], st1[r1 -- _type] .type = mkclasstype(class), ∃ refs, r0. ¬ dups(refs) ∧ r0 ∈ refs ∧ refs .first = r ∧ validrefs(str, refs + r0 ', st[r -- _type] .type, st), is_obj(str, r1, st1), ∀ fs. fs ' ∈ instfields(class) ∧ ¬ is_referencevalue(st[r -- fs ']) → st[r -- fs '] = st1[r1 -- fs '], ∀ fs. fs ' ∈ instfields(class) ∧ is_referencevalue(st[r -- fs ']) → ps=(st[r -- fs '] .refval, st, st1[r1 -- fs '] .refval, st1), ∀ st, r, st0, r0, str0. maxpath(str0, r0, st0) < maxpath(str, r1, st1) → (ps=(r, st, r0, st0) ∧ cyclic(str0, r, st) → junkref(str0, r, st) ∨ junkref(str0, r0, st0) ∨ cyclic(str0, r0, st0)) ⊦ r1 = jvmref, r = jvmref, junkref(str, r, st), junkref(str, r1, st1), cyclic(str, r1, st1)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, r, str)]]