| a = st[a, d0].min ⊦ a0 ∈ st[a, d] -- st[a, d].min ↔ a0 ∈ st, a0 = a, a0 = st[a, d].min, a ∈ st |
Used simplifier rules: min-put-01: ⊦ st[a, d].min = a → st[a, d0].min = a;%min-put-01: ⊦ st[a, d].min = a → st[a, d0].min = a;% ⊦ st[a, d] -- a = st -- a; (s)% ⊦ ¬ a ∈ st → st -- a = st; (s)