rintro _ ⟨a,ha,rfl⟩
α : Type u_1
inst✝ : CompleteLattice α
s✝ x y z a b : α
s : Set α
P : Partition s
f : P.RepFun
⊢ ⇑f '' s ⊆ s
case intro.intro
α : Type u_1
inst✝ : CompleteLattice α
s✝ x y z a✝ b : α
s : Set α
P : Partition s
f : P.RepFun
a : α
ha : a ∈ s
⊢ f a ∈ s