| ⊦ a0 = a, a = st[a, d].min, (a0 ∈ st[a, d] -- st[a, d].min ↔ a0 ∈ st -- st.min) ∧ (st[a, d] -- st[a, d].min)[a0] = (st -- st.min)[a0] |
⊦ a ≠ b → (st -- b)[a] = st[a]
¬ a0 ≠ st[a, d].min ⊦ a0 = a, a = st[a, d].min, (a0 ∈ st[a, d] -- st[a, d].min ↔ a0 ∈ st -- st.min) ∧ (st[a, d] -- st[a, d].min)[a0] = (st -- st.min)[a0]
a0 ≠ st[a, d].min ⊦ a0 = a, a = st[a, d].min, (a0 ∈ st[a, d] -- st[a, d].min ↔ a0 ∈ st -- st.min) ∧ st[a, d][a0] = (st -- st.min)[a0]
Used terms: a0, st[a, d].min, st[a, d]