| rk = r -- sk, # st0 .refs < # (st1 .refs ++ r), st1[rk, val] ⊆ st0, ∀ st. # st1 .refs ≤ # st .refs ∨ ¬ st1 ⊆ st ⊦ |
st1[r -- sk, val] ⊆ st0, # st0 .refs < # (st1 .refs ++ r), ∀ st. # st1 .refs ≤ # st .refs ∨ ¬ st1 ⊆ st ⊦
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m < n → n ≠ 0], [CSIMPFORWARD : ⊦ m < n → n ≠ 0])]]