intro ⟨rfl, hs⟩
case a.mpr
α : Sort u_1
β : ?m.14390
γ : ?m.14393
a : α
s : Set α
x : α
⊢ x ∈ Set.pureIf a (a ∈ s) → x ∈ (Set.pure a).inter s
case a.mpr
α : Sort u_1
β : ?m.14390
γ : ?m.14393
a : α
s : Set α
x : α
hs : x ∈ s
⊢ x ∈ (Set.pure x).inter s