| (a0 ∈ st[a, d] ↔ a0 ∈ st0) ∧ (a0 ∈ st[a, d] → st[a, d][a0] = st0[a0]), ∀ 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 |
a0 ∈ st ↔ a0 ∈ st0, ∀ a0. (a0 ∈ st[a, d] ↔ a0 ∈ st0) ∧ (a0 ∈ st[a, d] → st[a, d][a0] = st0[a0]), a0 ∈ st0 → st[a0] = st0[a0] ⊦ a0 = a, a ∈ st, a ∈ st0 ∧ st0[a] = d
Used simplifier rules: in-neq: ⊦ a ≠ b → (a ∈ st[b, d] ↔ a ∈ st);%At-other: ⊦ a ≠ b → st[b, d][a] = st[a];