| st[r -- mkfs(class, ty1, fieldvar) '] = refval(r2), validrefs(str, r2 ', ty1, st), mkfs(class, ty1, fieldvar) ' ∈ instfields(st[r -- _type] .type .class), is_obj(str, r, st), st[r -- _type] .type ≤ ty, junkrefs(str, r2 ' + r0 ' + refs0, ty1, st), ¬ is_valid_ref(str, r0, st) ∨ is_obj(r2, st) ∧ mkfs(class0, ty2, fieldvar0) ' ∈ instfields(st[r2 -- _type] .type .class) ∧ is_referencevalue(st[r2 -- mkfs(class0, ty2, fieldvar0) ']) ∧ r0 = st[r2 -- mkfs(class0, ty2, fieldvar0) '] .refval ∧ ¬ st[st[r2 -- mkfs(class0, ty2, fieldvar0) '] .refval -- _type] .type ≤ ty2 ∨ is_array(r2, st) ∧ 0 ≤ i ∧ i < st[r2 -- _length] .intval ∧ is_referencevalue(st[r2 -- i ']) ∧ r0 = st[r2 -- i '] .refval ∧ ¬ st[st[r2 -- i '] .refval -- _type] .type ≤ st[r2 -- _type] .type .type, ∀ str0, ty0, st0. junkrefs(str0, r2 ' + r0 ' + refs0, ty0, st0) → (∃ refs, r1, refs1. r2 ' + r0 ' + refs0 = refs + r1 ' + refs1 ∧ validrefs(str0, refs, ty0, st0) ∧ r1 ≠ jvmref ∧ ( ¬ is_valid_ref(str0, r1, st0) ∨ refs = [] ∧ ¬ st0[r1 -- _type] .type ≤ ty0 ∨ refs ≠ [] ∧ ( is_obj(refs .last, st0) ∧ (∃ fs. fs ' ∈ instfields(st0[refs .last -- _type] .type .class) ∧ is_referencevalue(st0[refs .last -- fs ']) ∧ r1 = st0[refs .last -- fs '] .refval ∧ ¬ st0[st0[refs .last -- fs '] .refval -- _type] .type ≤ fs .type) ∨ is_array(refs .last, st0) ∧ (∃ i. 0 ≤ i ∧ i < st0[refs .last -- _length] .intval ∧ is_referencevalue(st0[refs .last -- i ']) ∧ r1 = st0[refs .last -- i '] .refval ∧ ¬ st0[st0[refs .last -- i '] .refval -- _type] .type ≤ st0[refs .last -- _type] .type .type)))) ⊦ r0 = jvmref, r = jvmref, ∃ fs. fs ' ∈ instfields(st[r -- _type] .type .class) ∧ is_referencevalue(st[r -- fs ']) ∧ r2 = st[r -- fs '] .refval ∧ validrefs(str, st[r -- fs '] .refval ', fs .type, st) |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) .type = ty], [CSIMPSEQ : ⊦ is_referencevalue(refval(r))], [CSIMPSEQ : ⊦ refval(r) .refval = r])], [EXTRATERMS : (mkfs(class, ty1, fieldvar))]]