| ⊦ r ≠ jvmref → (_mode ∈ st[((r -- sk) × val) ' + rkvs] ↔ _mode ∈ st[rkvs]) |
⊦ st[(rk × val) ' + rkvs] = (st[rk, val][rkvs])
⊦ rk ∈ st[rkvs] ↔ rk ∈ st ∨ rk ∈ rkvs
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r ≠ jvmref → _mode ≠ r -- sk], [CSIMPSEQ : ⊦ rk ∈ st[rk0, val] ↔ rk = rk0 ∨ rk ∈ st], [CSIMPSEQ : ⊦ (rkvs + rkvs0) + rkvs1 = rkvs + rkvs0 + rkvs1])]]