proposition: Proposition hset_struct_with_smash_setquotpr {P : hset_cartesian_struct} {Pt : pointed_hset_struct P} (SP : hset_struct_with_smash P Pt) {X Y : hSet} (PX : P X) (PY : P Y) : mor_hset_struct P (hset_struct_prod P PX PY) (SP X Y PX PY) (setquotpr (smash_eqrel P Pt PX PY)).
proof: Proof. exact (pr122 (pr22 (pr222 SP) X Y PX PY)). Qed.
imports: UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.DisplayedCats.Core UniMath.CategoryTheory.DisplayedCats.Structures.CartesianStructure UniMath.CategoryTheory.DisplayedCats.Structures.StructureLimitsAndColimits