Definition hset_struct_smash_eval_fun {P : hset_cartesian_struct} {Pt : pointed_hset_struct P} {SP : hset_struct_with_smash P Pt} (PC : hset_struct_with_smash_closed_pointed SP) {X Y : hSet} (PX : P X) (PY : P Y) : setquot (smash_eqrel P Pt (pr1 PC X Y PX PY) PX) → Y. Proof. exact (hset_struct_smash_curry_fun PC (identity _)). Defined.
Require Import UniMath.MoreFoundations.All. Require Import UniMath.CategoryTheory.Core.Categories. Require Import UniMath.CategoryTheory.DisplayedCats.Core. Require Import UniMath.CategoryTheory.DisplayedCats.Structures.CartesianStructure. Require Import UniMath.CategoryTheory.DisplayedCats.Structures.StructureLimitsAndColimits.