| ∀ class. ¬ jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ rkvs ⊦ (∀ class. tdname∃(str, class) → initdone(class, st[rkvs])) ↔ init(str, st), _uninit ∈ rkvs |
⊦ initdone(class1, st) ↔ ¬ initerror(class1, st) ∧ ¬ initundone(class1, st)
⊦ initerror(class1, st) ↔ (jvmref -- mkfs(class1, void_type, `initstate' .field) ') × initval(error) ∈ st
⊦ rk ∈ st[rkvs] ↔ rk ∈ st ∨ rk ∈ rkvs
⊦ initundone(class1, st) ↔ (jvmref -- mkfs(class1, void_type, `initstate' .field) ') × initval(undone) ∈ st ∨ ¬ jvmref -- mkfs(class1, void_type, `initstate' .field) ' ∈ st ∧ _uninit ∈ st
∀ class. ¬ jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ rkvs ⊦ (∀ class. tdname∃(str, class) → ( ¬ jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ st ∧ ¬ jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ rkvs ∨ (st[rkvs][jvmref -- mkfs(class, void_type, `initstate' .field) ']) ≠ initval(error)) ∧ ( ¬ jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ st ∧ ¬ jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ rkvs ∨ (st[rkvs][jvmref -- mkfs(class, void_type, `initstate' .field) ']) ≠ initval(undone)) ∧ (jvmref -- mkfs(class, void_type, `initstate' .field) ' ∈ st[rkvs] ∨ ¬ _uninit ∈ st)) ↔ init(str, st), _uninit ∈ rkvs
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ rk × val ∈ st ↔ ¬ ¬ (rk ∈ st ∧ st[rk] = val)])]]