| is_obj(str, r, st) ∧ st[r -- _type] .type ≤ st[r -- _type] .type, is_obj(str, r, st), refs0 = [] ∨ (∃ fs. fs ' ∈ instfields(st[r -- _type] .type .class) ∧ is_referencevalue(st[r -- fs ']) ∧ refs0 .first = st[r -- fs '] .refval ∧ validrefs(str, refs0, fs .type, st)) ⊦ r = (r ' + refs0) .last, ∃ fs. fs ' ∈ instfields(st[r -- _type] .type .class) ∧ is_referencevalue(st[r -- fs ']) ∧ ( st[r -- fs '] .refval ≠ jvmref ∧ st[st[r -- fs '] .refval -- _type] .type ≤ fs .type ∧ path∃(str, st[r -- fs '] .refval, (r ' + refs0) .last, st) ∨ st[r -- fs '] .refval = jvmref ∧ (r ' + refs0) .last = jvmref) |
refs0 .first = st[r -- fs '] .refval, is_obj(str, r, st), fs ' ∈ instfields(st[r -- _type] .type .class), is_referencevalue(st[r -- fs ']), validrefs(str, refs0, fs .type, st) ⊦ refs0 = [], r = refs0 .last, ∃ fs0. fs0 ' ∈ instfields(st[r -- _type] .type .class) ∧ is_referencevalue(st[r -- fs0 ']) ∧ ( st[r -- fs0 '] .refval ≠ jvmref ∧ st[st[r -- fs0 '] .refval -- _type] .type ≤ fs0 .type ∧ path∃(str, st[r -- fs0 '] .refval, refs0 .last, st) ∨ st[r -- fs0 '] .refval = jvmref ∧ refs0 .last = jvmref)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ refs ≠ [] → (r ' + refs) .last = refs .last], [CSIMPSEQ : ⊦ r ' .last = r], [CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPSEQ : ⊦ refs + [] = refs], [CSIMPSEQ : ⊦ ty ≤ ty])]]