| acc = r0 + refs, r0 = st[r -- mkfs(class, ty0, fieldvar) '] .refval, is_obj(str, r, st), st[r -- _type] .type ≤ ty, mkfs(class, ty0, fieldvar) ' ∈ instfields(st[r -- _type] .type .class), is_referencevalue(st[r -- mkfs(class, ty0, fieldvar) ']), validrefs(str, acc + refs0, ty0, st), ∀ str, refs0, ty, st. validrefs(str, acc + refs0, ty, st) → validrefs(str, acc, ty, st) ⊦ r = jvmref, acc = [], ∃ fs. fs ' ∈ instfields(st[r -- _type] .type .class) ∧ is_referencevalue(st[r -- fs ']) ∧ r0 = st[r -- fs '] .refval ∧ validrefs(str, acc, fs .type, st) |
is_obj(str, r, st), st[r -- _type] .type ≤ ty, mkfs(class, ty0, fieldvar) ' ∈ instfields(st[r -- _type] .type .class), is_referencevalue(st[r -- mkfs(class, ty0, fieldvar) ']), validrefs(str, (st[r -- mkfs(class, ty0, fieldvar) '] .refval ' + refs) + refs0, ty0, st), ∀ str0, refs1, ty1, st0. validrefs(str0, (st[r -- mkfs(class, ty0, fieldvar) '] .refval ' + refs) + refs1, ty1, st0) → validrefs(str0, st[r -- mkfs(class, ty0, fieldvar) '] .refval ' + refs, ty1, st0) ⊦ r = jvmref, ∃ fs. fs ' ∈ instfields(st[r -- _type] .type .class) ∧ is_referencevalue(st[r -- fs ']) ∧ st[r -- mkfs(class, ty0, fieldvar) '] .refval = st[r -- fs '] .refval ∧ validrefs(str, st[r -- mkfs(class, ty0, fieldvar) '] .refval ' + refs, fs .type, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPSEQ : ⊦ r ' + refs ≠ []], [CSIMPSEQ : ⊦ r + refs = r ' + refs])]]