Section s_pulb_diese_def.
Variables (D : Setoid) (t1 : Map D A) (t2 : Map D C).
Hypothesis H : Pullback_eq1 f g t1 t2.

Lemma Check_S_pulb_constr :
forall d : D, S_pulb_constr (Build_Sprod (t1 d) (t2 d)).