Definition mor_to_end' (w' : D) (fs : ∏ (x : C), w' --> F (x ,, x)) (H : is_wedge (make_wedge_data w' fs)) : w' --> w := mor_to_end (make_wedge _ H).
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.CategoryTheory.Core.Categories. Require Import UniMath.CategoryTheory.Core.Functors. Require Import UniMath.CategoryTheory.OppositeCategory.Core. Require Import UniMath.CategoryTheory.PrecategoryBinProduct. Require Import UniMath.CategoryTheory.Limits.Products. Require Import UniMath.CategoryTheory.Limits.Equalizers.