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