| is_obj(str, r, st), st[r -- _type] .type ≤ ty, ∀ str, ty, st, st0. validrefs(str, refs0, ty, st) ∧ (∀ r. r ∈ refs0 → unchangedNorec(r, st, st0)) → validrefs(str, refs0, ty, st0), ∀ r0. r0 = r ∨ r0 ∈ refs0 → unchangedNorec(r0, st, st0), refs0 = [] ∨ 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 = jvmref, validrefs(str, r ' + refs0, ty, st0) |
fs = mkfs(class, ty0, fieldvar), is_obj(str, r, st), st[r -- _type] .type ≤ ty, ∀ str, ty, st, st0. validrefs(str, refs0, ty, st) ∧ (∀ r. r ∈ refs0 → unchangedNorec(r, st, st0)) → validrefs(str, refs0, ty, st0), ∀ r0. r0 = r ∨ r0 ∈ refs0 → unchangedNorec(r0, st, st0), refs0 = [] ∨ fs ' ∈ instfields(st[r -- _type] .type .class) ∧ is_referencevalue(st[r -- fs ']) ∧ refs0 .first = st[r -- fs '] .refval ∧ validrefs(str, refs0, ty0, st) ⊦ r = jvmref, validrefs(str, r ' + refs0, ty, st0)
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ class = fs .class ∧ ty = fs .type ∧ fieldvar = fs .field ↔ fs = mkfs(class, ty, fieldvar)])], [EXTRATERMS : (fs, class, ty0, fieldvar)]]