Used simplifier rules: Del-in: ⊦ a ∈ st -- b ↔ a ≠ b ∧ a ∈ st;%notmemlookup: ⊦ ¬ a ∈ st → st[a] = (∅)[a];