| normalmode(st), ∀ rk. rk ∈ st → rk .ref ≠ r ⊦ r = jvmref, _mode ∈ st[r -- sk, val] ∧ (st[r -- sk, val][_mode]) = noval |
⊦ normalmode(st) → st[_mode] = noval
normalmode(st), ∀ rk. rk ∈ st → rk .ref ≠ r ⊦ r = jvmref, _mode ∈ st
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (st[rk0, val][rk]) = ((rk = rk0 ⊃ val; st[rk]))], [CSIMPSEQ : ⊦ r ≠ jvmref → _mode ≠ r -- sk], [CSIMPSEQ : ⊦ rk ∈ st[rk0, val] ↔ rk = rk0 ∨ rk ∈ st])]]