| ⊦ a0 = b, a = b, a ∈ st, (a0 ∈ st[a, d] -- b ↔ a0 ∈ (st -- b)[a, d]) ∧ (st[a, d] -- b)[a0] = (st -- b)[a, d][a0] |
⊦ a0 = b, a = b, a ∈ st, (a0 ∈ st[a, d] ↔ a0 ∈ (st -- b)[a, d]) ∧ st[a, d][a0] = (st -- b)[a, d][a0]
Used simplifier rules: Del-in: ⊦ a ∈ st -- b ↔ a ≠ b ∧ a ∈ st;%Del-at: ⊦ a ≠ b → (st -- b)[a] = st[a];