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