| initdone(class2, st), tdname∃(str, class2), mkfs(class0, ty, fieldvar) ' ∈ statfields(class2), tdname∃(str, class0), mkfs(class0, ty, fieldvar) ' ∈ statfields(class0), initdone(class0, st), goodfieldandtype(jvmref, mkfs(class0, ty, fieldvar) ', st) ∧ type∃(str, mkfs(class0, ty, fieldvar) ' .fs .type) ∧ mkfs(class0, ty, fieldvar) ' .fs .type ≠ void_type ∧ ( is_reftype(mkfs(class0, ty, fieldvar) ' .fs .type) → validrefval(str, st[jvmref -- mkfs(class0, ty, fieldvar) '], mkfs(class0, ty, fieldvar) ' .fs .type, st)) ⊦ class = `java.lang.Object' .class, class0 = class, ty = void_type, initdone(class, st), mkfs(class, void_type, `initstate' .field) ' ∈ fis, ( is_reftype(ty) → validrefval (str, st[jvmref -- mkfs(class0, ty, fieldvar) '], ty, addclass(class, fis + (mkfs(class, void_type, `initstate' .field) ' × initval(error)) ', st))) ∧ type∃(str, ty) ∧ goodfieldandtype(jvmref, mkfs(class0, ty, fieldvar) ', addclass(class, fis + (mkfs(class, void_type, `initstate' .field) ' × initval(error)) ', st)) |
initdone(class2, st), tdname∃(str, class2), mkfs(class0, ty, fieldvar) ' ∈ statfields(class2), tdname∃(str, class0), mkfs(class0, ty, fieldvar) ' ∈ statfields(class0), initdone(class0, st), jvmref -- mkfs(class0, ty, fieldvar) ' ∈ st, okval(st[jvmref -- mkfs(class0, ty, fieldvar) '], ty), type∃(str, ty), jvmref ∈ st, is_reftype(ty) → validrefval(str, st[jvmref -- mkfs(class0, ty, fieldvar) '], ty, st) ⊦ class = `java.lang.Object' .class, class0 = class, ty = void_type, initdone(class, st), mkfs(class, void_type, `initstate' .field) ' ∈ fis, ( is_reftype(ty) → validrefval (str, st[jvmref -- mkfs(class0, ty, fieldvar) '], ty, addclass(class, fis + (mkfs(class, void_type, `initstate' .field) ' × initval(error)) ', st))) ∧ goodfieldandtype(jvmref, mkfs(class0, ty, fieldvar) ', addclass(class, fis + (mkfs(class, void_type, `initstate' .field) ' × initval(error)) ', st))
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st], [CSIMPSEQ : ⊦ goodfieldandtype (r, mkfs(class1, ty, fieldvar) ', st) ↔ r -- mkfs(class1, ty, fieldvar) ' ∈ st ∧ okval (st[ r -- mkfs (class1, ty, fieldvar) '], ty)], [CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) .type = ty], [CSIMPSEQ : ⊦ fs ' .fs = fs])]]