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