change _ ≤ k * (Finset.card _ * Finset.card _ - Finset.card _)
C : Type u_1
J : Type u_2
r : C → J → Prop
inst✝¹ : Fintype J
inst✝ : Fintype C
k : ℕ
hk : ∀ (p : JudgePair J), p.Distinct → (agreedContestants r p).card ≤ k
⊢ (A r).card ≤ k * (Fintype.card J * Fintype.card J - Fintype.card J)
C : Type u_1
J : Type u_2
r : C → J → Prop
inst✝¹ : Fintype J
inst✝ : Fintype C
k : ℕ
hk : ∀ (p : JudgePair J), p.Distinct → (agreedContestants r p).card ≤ k
⊢ (A r).card ≤ k * (Finset.univ.card * Finset.univ.card - Finset.univ.card)