| is_obj(str, r1, st1), st[r -- _type] = st1[r1 -- _type], cyclic(str, r, st), is_classtype(st1[r1 -- _type] .type) → (∀ fs. fs ' ∈ instfields(st1[r1 -- _type] .type .class) ∧ is_referencevalue(st[r -- fs ']) → ps=(st[r -- fs '] .refval, st, st1[r1 -- fs '] .refval, st1)) ∧ (∀ fs. fs ' ∈ instfields(st1[r1 -- _type] .type .class) ∧ ¬ is_referencevalue(st[r -- fs ']) → st[r -- fs '] = st1[r1 -- fs ']), is_arraytype(st1[r1 -- _type] .type) → st[r -- _length] .intval = st1[r1 -- _length] .intval ∧ (∀ i. ¬ i < 0 ∧ ¬ st[r -- _length] .intval ≤ i ∧ is_referencevalue(st[r -- i ']) → ps=(st[r -- i '] .refval, st, st1[r1 -- i '] .refval, st1)) ∧ (∀ i. ¬ i < 0 ∧ ¬ st[r -- _length] .intval ≤ i ∧ ¬ is_referencevalue(st[r -- i ']) → st[r -- i '] = st1[r1 -- i ']), ∀ 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)) ⊦ r = jvmref, r1 = jvmref, cyclic(str, r1, st1), junkref(str, r1, st1), junkref(str, r, st) |
st[r -- _type] = st1[r1 -- _type], is_obj(str, r1, st1), cyclic(str, r, st), is_classtype(st1[r1 -- _type] .type), ∀ fs. fs ' ∈ instfields(st1[r1 -- _type] .type .class) ∧ is_referencevalue(st[r -- fs ']) → ps=(st[r -- fs '] .refval, st, st1[r1 -- fs '] .refval, st1), ∀ fs. fs ' ∈ instfields(st1[r1 -- _type] .type .class) ∧ ¬ is_referencevalue(st[r -- fs ']) → st[r -- 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)) ⊦ r = jvmref, r1 = jvmref, cyclic(str, r1, st1), junkref(str, r1, st1), junkref(str, r, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_classtype(ty) → ¬ is_arraytype(ty)], [CSIMPSEQ : ⊦ ¬ is_classtype (st[r -- _type] .type) → ¬ is_obj(str, r, st)])]]