| ∀ str, st. validfieldinits(str, fis0, st) ↔ validfieldinits(fis0, st) ∧ ¬ junkrefs(str, fis0 .vals, st) ∧ (∀ sk. sk ∈ fis0 → type∃(str, sk .fs .type)) ⊦ validval(str, val, ty, st) ∧ type∃(str, ty) ∧ validfieldinits(str, fis0, st) ↔ okval(val, ty) ∧ ( is_referencevalue(val) → val .refval = jvmref ∨ val .refval -- _type ∈ st ∧ is_typevalue(st[val .refval -- _type]) ∧ st[val .refval -- _type] .type ≤ ty) ∧ validfieldinits(fis0, st) ∧ ¬ junkrefs(str, val ' + fis0 .vals, st) ∧ (∀ sk. sk ∈ (mkfs(class, ty, fieldvar) ' × val) ' + fis0 → type∃(str, sk .fs .type)) |
⊦ junkrefs(str, val ' + vals, st) ↔ is_referencevalue(val) ∧ junkref(str, val .refval, st) ∨ junkrefs(str, vals, st)
∀ str, st. validfieldinits(str, fis0, st) ↔ validfieldinits(fis0, st) ∧ ¬ junkrefs(str, fis0 .vals, st) ∧ (∀ sk. sk ∈ fis0 → type∃(str, sk .fs .type)) ⊦ validval(str, val, ty, st) ∧ type∃(str, ty) ∧ validfieldinits(str, fis0, st) ↔ okval(val, ty) ∧ ( is_referencevalue(val) → val .refval = jvmref ∨ val .refval -- _type ∈ st ∧ is_typevalue(st[val .refval -- _type]) ∧ st[val .refval -- _type] .type ≤ ty) ∧ validfieldinits(fis0, st) ∧ ¬ (is_referencevalue(val) ∧ junkref(str, val .refval, st) ∨ junkrefs(str, fis0 .vals, st)) ∧ (∀ sk. sk ∈ (mkfs(class, ty, fieldvar) ' × val) ' + fis0 → type∃(str, sk .fs .type))
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, fis0 .vals, val, str)]]