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