a ∈ (st -- a)[a, st[a]] ⊦ # (st -- a)[a, d] = # (st -- a)[a, st[a]]
Used simplifier rules: insins: ⊦ st[a, d0][a, d] = st[a, d];