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