∀ (J : Type u_1) (f : J → ωCPO) (x : CategoryTheory.Limits.Cone (CategoryTheory.Discrete.functor f))
  (x_1 : CategoryTheory.Discrete J),
  CategoryTheory.CategoryStruct.comp
      { toFun := fun t j => (CategoryTheory.ConcreteCategory.hom (x.π.app { as := j })) t, monotone' := ⋯,
        map_ωSup' := ⋯ }
      ((ωCPO.HasProducts.product f).π.app x_1) =
    CategoryTheory.CategoryStruct.comp
      { toFun := fun t j => (CategoryTheory.ConcreteCategory.hom (x.π.app { as := j })) t, monotone' := ⋯,
        map_ωSup' := ⋯ }
      ((ωCPO.HasProducts.product f).π.app x_1)