⊦ eqex(st, st0, r) ↔ st -- r = st0 -- r
st -- r = st0 -- r ⊦ r0 = r, st[r0 -- sk] = st0[r0 -- sk]
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (r, st0, st)]]