∀ {P : TopCat → Prop} [inst : ∀ (S : CompHausLike P) (p : ↑S.toTop → Prop), CompHausLike.HasProp P (Subtype p)]
  [inst_1 : CompHausLike.HasProp P PUnit.{u + 1}] [inst_2 : CompHausLike.HasExplicitFiniteCoproducts P]
  (Y : CategoryTheory.Functor (CompHausLike P)ᵒᵖ (Type (max u w)))
  [inst_3 : CategoryTheory.Limits.PreservesFiniteProducts Y],
  CompHausLike.LocallyConstant.counitApp Y =
    {
      app := fun x =>
        match x with
        | Opposite.op S => CompHausLike.LocallyConstant.counitAppApp S Y,
      naturality := ⋯ }