∀ (F : CategoryTheory.Functor Profiniteᵒᵖ (Type (u_1 + 1))) [CategoryTheory.Limits.PreservesFiniteProducts F]
  (X : Profinite) [Finite ↑X.toTop],
  CategoryTheory.Limits.PreservesLimit
    (CategoryTheory.Discrete.functor fun x => Opposite.op (Profinite.of PUnit.{u_1 + 1})) F