| a ∈ st, a ∈ s ⊦ # s = 0, (st \ (dom st \ s))[a] = st[a], s = ∅ |
⊦ ¬ a ∈ s → (st \ s)[a] = st[a]
Used simplifier rules: Diff-mems-get: ⊦ a ∈ s → (st \ s)[a] = (∅)[a];%Dom: ⊦ a ∈ dom st ↔ a ∈ st;% ⊦ a ∈ s1 \ s2 ↔ a ∈ s1 ∧ ¬ a ∈ s2; (ws) Used terms: a, dom st \ s, st