| ∀ a. a ∈ st0 → (∃ st1. ¬ a ∈ st1 ∧ st0 = st1[a, st0[a]]), a0 ∈ st0 → ¬ a0 ∈ st ∧ st0 = st[a0, st0[a0]] ⊦ ∃ st. ¬ a0 ∈ st ∧ st0[a0, d] = st[a0, d] |
a0 ∈ st0, ∀ a. a ∈ st0 → (∃ st1. ¬ a ∈ st1 ∧ st0 = st1[a, st0[a]]), a0 ∈ st0 → ¬ a0 ∈ st ∧ st0 = st[a0, st0[a0]] ⊦ ∃ st. ¬ a0 ∈ st ∧ st0[a0, d] = st[a0, d]
Used simplifier rules: inj-put: ⊦ ¬ a ∈ st ∧ ¬ a ∈ st0 → (st[a, d] = st0[a, d] ↔ st = st0); Used formulas: a0 ∈ st0