| ∀ class. tdname∃(str, class) → (¬ jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ st ∨ st[jvmref -- mkfs(class, void_type, `initstate' .field) '] ≠ initval(error)) ∧ (¬ jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ st ∨ st[jvmref -- mkfs(class, void_type, `initstate' .field) '] ≠ initval(undone)) ∧ (jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ st ∨ ¬ _uninit ∈ st) ⊦ ∀ class0. tdname∃(str, class0) → ( ¬ jvmref -- mkfs(class0, void_type, `initstate' .field) ' ∈ st ∨ (st[r -- mkfs(class, ty, fieldvar) ', val][jvmref -- mkfs(class0, void_type, `initstate' .field) ']) ≠ initval(error)) ∧ ( ¬ jvmref -- mkfs(class0, void_type, `initstate' .field) ' ∈ st ∨ (st[r -- mkfs(class, ty, fieldvar) ', val][jvmref -- mkfs(class0, void_type, `initstate' .field) ']) ≠ initval(undone)) ∧ ( jvmref -- mkfs(class0, void_type, `initstate' .field) ' ∈ st[r -- mkfs(class, ty, fieldvar) ', val] ∨ _uninit ≠ r -- mkfs(class, ty, fieldvar) ' ∧ ¬ _uninit ∈ st), ty = void_type |
tdname∃(str, class0), ∀ class. tdname∃(str, class) → (¬ jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ st ∨ st[jvmref -- mkfs(class, void_type, `initstate' .field) '] ≠ initval(error)) ∧ (¬ jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ st ∨ st[jvmref -- mkfs(class, void_type, `initstate' .field) '] ≠ initval(undone)) ∧ (jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ st ∨ ¬ _uninit ∈ st) ⊦ ty = void_type, ( ¬ jvmref -- mkfs(class0, void_type, `initstate' .field) ' ∈ st ∨ (st[r -- mkfs(class, ty, fieldvar) ', val][jvmref -- mkfs(class0, void_type, `initstate' .field) ']) ≠ initval(error)) ∧ ( ¬ jvmref -- mkfs(class0, void_type, `initstate' .field) ' ∈ st ∨ (st[r -- mkfs(class, ty, fieldvar) ', val][jvmref -- mkfs(class0, void_type, `initstate' .field) ']) ≠ initval(undone)) ∧ (jvmref -- mkfs(class0, void_type, `initstate' .field) ' ∈ st ∨ ¬ _uninit ∈ st)
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : fieldspec, , inj, ⊦ mkfs(class, ty, fieldvar) = mkfs (class0, ty0, fieldvar0) ↔ class = class0 ∧ ty = ty0 ∧ fieldvar = fieldvar0], [CSIMPNAMEDSEQ : specialkeys, , uninit-02, ⊦ r -- fs ' = _uninit ↔ r = jvmref ∧ fs = mkfs (`java.lang.Object' .class, void_type, `uninit' .field)], [CSIMPNAMEDSEQ : fieldspec, , inj-01, ⊦ mkfs(class1, ty, fieldvar) = mkfs (class2, ty0, fieldvar0) ↔ ¬ ¬ ( class1 = class2 ∧ ty = ty0 ∧ fieldvar = fieldvar0)], [CSIMPNAMEDSEQ : storekey, , inj-03, ⊦ fs ' = fs0 ' ↔ fs = fs0], [CSIMPNAMEDSEQ : refkey, , inj-01, ⊦ r -- sk = r0 -- sk0 ↔ ¬ ¬ (r = r0 ∧ sk = sk0)], [CSIMPNAMEDSEQ : store, javastore, In-insert, ⊦ rk ∈ st[rk0, val] ↔ rk = rk0 ∨ rk ∈ st])]]