⊦ r ∈ st ↔ (∃ sk. r -- sk ∈ st)
st .min = r0 -- sk, ∃ sk. r -- sk ∈ st ⊦ r = r0, r ∈ st .butmin
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, r)]]