intro ⟨rfl, hp, hs⟩
case a.mpr
α : Sort u_1
β : ?m.16894
γ : ?m.16897
a : α
p : Prop
s : Set α
x : α
⊢ x ∈ Set.pureIf a (p ∧ a ∈ s) → x ∈ s.inter (Set.pureIf a p)
case a.mpr
α : Sort u_1
β : ?m.16894
γ : ?m.16897
a : α
p : Prop
s : Set α
x : α
hp : p
hs : x ∈ s
⊢ x ∈ s.inter (Set.pureIf x p)