aesop
case a.mpr.intro.intro.intro.intro.intro
C : Type u_1
J : Type u_2
r : C → J → Prop
inst✝¹ : Fintype J
inst✝ : Fintype C
p : JudgePair J
h : p.Distinct
c w✝² : C
w✝¹ w✝ : J
right✝¹ : AgreedTriple.contestant (w✝², w✝¹, w✝) = c
left✝ :
  (w✝², w✝¹, w✝) ∈ Finset.univ ∧
    JudgePair.Agree r (AgreedTriple.judgePair (w✝², w✝¹, w✝)) (AgreedTriple.contestant (w✝², w✝¹, w✝)) ∧
      (AgreedTriple.judgePair (w✝², w✝¹, w✝)).Distinct
right✝ : AgreedTriple.judgePair (w✝², w✝¹, w✝) = p
⊢ c ∈ Finset.filter (fun c => JudgePair.Agree r p c) Finset.univ
no goals