| ⊦ st1 = st0[a, d] ↔ a ∈ st1 ∧ st1[a] = d ∧ (∀ b. a ≠ b → (b ∈ st0 ↔ b ∈ st1) ∧ (b ∈ st0 → st0[b] = st1[b])) |
a ∈ st1 ∧ st1[a] = d ∧ (∀ b. a ≠ b → (b ∈ st0 ↔ b ∈ st1) ∧ (b ∈ st0 → st0[b] = st1[b])) ⊦ st1 = st0[a, d]
Used simplifier rules: At-same: ⊦ st[a, d][a] = d;%in-neq: ⊦ a ≠ b → (a ∈ st[b, d] ↔ a ∈ st);%At-other: ⊦ a ≠ b → st[b, d][a] = st[a];%In-insert: ⊦ a ∈ st[b, d] ↔ a = b ∨ a ∈ st;