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