intro ⟨_, ⟨rfl, hp⟩, h⟩
case a.mp
α : Sort u_2
β : Sort u_1
γ : ?m.6074
f : α → β
a : α
p : Prop
y : β
⊢ y ∈ Set.map f (Set.pureIf a p) → y ∈ Set.pureIf (f a) p
case a.mp
α : Sort u_2
β : Sort u_1
γ : ?m.6074
f : α → β
a : α
p : Prop
y : β
hp : p
h : f a = y
⊢ y ∈ Set.pureIf (f a) p