| ⊦ (a0 ∈ st -- a ∧ ¬ a0 ∈ s ↔ a0 ∈ (st \ s) -- a) ∧ (a0 ∈ st -- a ∧ ¬ a0 ∈ s → ((st -- a) \ s)[a0] = (st \ s)[a0]) |
⊦ a0 ∈ st -- a ∧ ¬ a0 ∈ s ↔ a0 ∈ (st \ s) -- a
Used simplifier rules: Diff-get: ⊦ ¬ a ∈ s → (st \ s)[a] = st[a];%Del-at-strong: a ≠ b ⊦ (st -- b)[a] = st[a]; from specification store%Del-in: ⊦ a ∈ st -- b ↔ a ≠ b ∧ a ∈ st; from specification store%Del-notin: ⊦ ¬ a ∈ st -- a; from specification store