| acc + refs0 = r0 + refs, r0 = st[r -- mkfs(class, ty0, fieldvar) '] .refval, st[r -- _type] .type ≤ ty, junkrefs(str, acc + refs0, ty0, st), is_referencevalue(st[r -- mkfs(class, ty0, fieldvar) ']), mkfs(class, ty0, fieldvar) ' ∈ instfields(st[r -- _type] .type .class), is_obj(str, r, st), ∀ str, refs0, ty, st. junkrefs(str, acc + refs0, ty, st) → junkrefs(str, acc, ty, st) ∨ validrefs(str, acc, ty, st) ⊦ acc + refs0 = [], r = jvmref, validrefs(str, r ' + acc, ty, st), junkrefs(str, r ' + acc, ty, st) |
acc + refs0 = st[r -- mkfs(class, ty0, fieldvar) '] .refval ' + refs, is_obj(str, r, st), mkfs(class, ty0, fieldvar) ' ∈ instfields(st[r -- _type] .type .class), is_referencevalue(st[r -- mkfs(class, ty0, fieldvar) ']), junkrefs(str, acc + refs0, ty0, st), st[r -- _type] .type ≤ ty, ∀ str, refs0, ty, st. junkrefs(str, acc + refs0, ty, st) → junkrefs(str, acc, ty, st) ∨ validrefs(str, acc, ty, st) ⊦ r = jvmref, acc + refs0 = [], junkrefs(str, r ' + acc, ty, st), validrefs(str, r ' + acc, ty, st), ¬ st[r -- mkfs(class, ty0, fieldvar) '] .refval ∈ acc ∧ ¬ st[r -- mkfs(class, ty0, fieldvar) '] .refval ∈ refs0
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r ∈ refs + refs0 ↔ ¬ ¬ (r ∈ refs ∨ r ∈ refs0)], [CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPFORWARD : ⊦ r ' + refs = refs0 → r ∈ refs0], [CSIMPSEQ : ⊦ r + refs = r ' + refs])]]