Definition Pb1_diese : r --> Fibred1_prod := Lim_diese l Pulb_cone.
End pb1_diese_def.

(* Specifications: *)
Lemma Prf_pb1_law2 : Pullback_law2 Fibred1_p Pb1_diese.
Lemma Prf_pb1_law3 : Pullback_law3 Fibred1_q Pb1_diese.
(* unicite' de r# *)
Lemma Prf_pb1_law4 : Pullback_law4 Fibred1_p Fibred1_q Pb1_diese.
Canonical Structure Pullback1_to_Pullback :=
Build_Pullback Prf_pb1_law1 Prf_pb1_law2 Prf_pb1_law3 Prf_pb1_law4.