| # st0 .refs < # (st1 .refs ++ rk .ref), st1[rk, val] ⊆ st0, ∀ st. # st1 .refs ≤ # st .refs ∨ ¬ st1 ⊆ st ⊦ |
rk = r -- sk, # st0 .refs < # (st1 .refs ++ r), st1[rk, val] ⊆ st0, ∀ st. # st1 .refs ≤ # st .refs ∨ ¬ st1 ⊆ st ⊦
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ r = rk .ref ∧ sk = rk .key ↔ rk = r -- sk])], [EXTRATERMS : (rk, r, sk)]]