refine Nat.le_antisymm ?_ ?_
α : Type u
β : Type v
inst✝³ : BishopFin α
inst✝² : BishopFin β
p q : α → Prop
inst✝¹ : DecidablePred p
inst✝ : DecidablePred q
f : β → α
f_surj : ∀ (a : α), ∃ b, f b = a
f_inj : ∀ (b₁ b₂ : β), f b₁ = f b₂ → b₁ = b₂
⊢ count p = count (p ∘ f)
case refine_1
α : Type u
β : Type v
inst✝³ : BishopFin α
inst✝² : BishopFin β
p q : α → Prop
inst✝¹ : DecidablePred p
inst✝ : DecidablePred q
f : β → α
f_surj : ∀ (a : α), ∃ b, f b = a
f_inj : ∀ (b₁ b₂ : β), f b₁ = f b₂ → b₁ = b₂
⊢ count p ≤ count (p ∘ f)

case refine_2
α : Type u
β : Type v
inst✝³ : BishopFin α
inst✝² : BishopFin β
p q : α → Prop
inst✝¹ : DecidablePred p
inst✝ : DecidablePred q
f : β → α
f_surj : ∀ (a : α), ∃ b, f b = a
f_inj : ∀ (b₁ b₂ : β), f b₁ = f b₂ → b₁ = b₂
⊢ count (p ∘ f) ≤ count p