| ⊦ ¬ _uninit ∈ st[r -- i ', val] ∧ (∀ rk. rk ∈ st[r -- i ', val] ∧ rk .ref = jvmref ∧ is_fskey(rk .key) ∧ rk .key .fs .type = void_type ∧ rk .key .fs .field = `initstate' .field → (st[r -- i ', val][rk]) ≠ initval(undone) ∧ (st[r -- i ', val][rk]) ≠ initval(error)) ↔ init(st) |
⊦ ¬ _uninit ∈ st ∧ (∀ rk. (rk = r -- i ' ∨ rk ∈ st) ∧ rk .ref = jvmref ∧ ¬ is_indexkey(rk .key) ∧ rk .key .fs .type = void_type ∧ rk .key .fs .field = `initstate' .field → ((rk = r -- i ' ⊃ val; st[rk])) ≠ initval(undone) ∧ ((rk = r -- i ' ⊃ val; st[rk])) ≠ initval(error)) ↔ init(st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (st[rk0, val][rk]) = ((rk = rk0 ⊃ val; st[rk]))], [CSIMPSEQ : ⊦ ¬ is_fskey(sk) ↔ is_indexkey(sk)], [CSIMPSEQ : ⊦ r -- i ' ≠ _uninit], [CSIMPSEQ : ⊦ rk ∈ st[rk0, val] ↔ rk = rk0 ∨ rk ∈ st])]]