| ¬ ¬ a ∈ s, dom st ∩ s = ∅ ⊦ (a ∈ st \ s ↔ a ∈ st) ∧ (st \ s)[a] = st[a] |
dom st ∩ s = ∅, a ∈ s ⊦ s = ∅, # s = 0, (a ∈ st \ s ↔ a ∈ st) ∧ (∅)[a] = st[a]
Used simplifier rules: Diff-mems-get: ⊦ a ∈ s → (st \ s)[a] = (∅)[a];%size-zero-01: ⊦ s ≠ ∅ → # s ≠ 0; (forward) from specification set-basic%ne-01: ⊦ a ∈ s → s ≠ ∅; (forward) from specification set-basic