{B A f g} (P : @Coeq B A f g -> Type) (coeq' : forall a, P (coeq a)) (cglue' : forall b, (cglue b) # (coeq' (f b)) = coeq' (g b)) : forall w, P w. Proof. rapply GraphQuotient_ind. intros a b [x [[] []]]. exact (cglue' x). Defined.
Require Import Basics. Require Import Types.Paths Types.Arrow Types.Sigma Types.Forall Types.Universe Types.Prod. Require Import Colimits.GraphQuotient.