| st[r2 -- _type] = st1[r1 -- _type], st1[r1 -- _type] .type = mkclasstype(class), r2 = st[r2 -- fs '] .refval, ps=(r2, st, st1[r1 -- fs '] .refval, st1), is_referencevalue(st[r2 -- fs ']), fs ' ∈ instfields(class), is_obj(str, r1, st1), is_obj(str, r2, st), validrefs(str, r2 ', fs .type, st), ∀ fs. fs ' ∈ instfields(class) ∧ ¬ is_referencevalue(st[r2 -- fs ']) → st[r2 -- fs '] = st1[r1 -- fs '], ∀ 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, r2 = jvmref, junkref(str, r2, st), junkref(str, r1, st1), cyclic(str, r1, st1), cyclic(str, r2, st), mkclasstype(class) ≤ fs .type |
⊦ validrefs(str, r ', ty, st) ↔ r = jvmref ∨ r ≠ jvmref ∧ is_valid_ref(str, r, st) ∧ st[r -- _type] .type ≤ ty
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_obj(str, r, st) → is_valid_ref(str, r, st)])], [EXTRATERMS : (st, fs .type, r2, str)]]