The category $\mathsf{Sets}_{*}$ admits a closed monoidal category with diagonals structure consisting of:
-
•
The Underlying Category. The category $\mathsf{Sets}_{*}$ of pointed sets.
-
•
The Monoidal Product. The smash product functor
\[ \wedge \colon \mathsf{Sets}_{*}\times \mathsf{Sets}_{*}\to \mathsf{Sets}_{*} \]of Item 1 of Proposition 7.5.1.1.10.
-
•
The Internal Hom. The internal Hom functor
\[ \boldsymbol {\mathsf{Sets}}_{*}\colon \mathsf{Sets}^{\mathsf{op}}_{*}\times \mathsf{Sets}_{*}\to \mathsf{Sets}_{*} \]of Item 1 of Proposition 7.5.2.1.2.
-
•
The Monoidal Unit. The functor
\[ \mathbb {1}^{\mathsf{Sets}_{*}} \colon \mathsf{pt}\to \mathsf{Sets}_{*} \] -
•
The Associators. The natural isomorphism
\[ \alpha ^{\mathsf{Sets}_{*}} \colon {\wedge }\circ {\webleft ({\wedge }\times \operatorname {\mathrm{id}}_{\mathsf{Sets}_{*}}\webright )} \mathbin {\overset {\mathord {\sim }}{\Longrightarrow }}{\wedge }\circ {\webleft (\operatorname {\mathrm{id}}_{\mathsf{Sets}_{*}}\times {\wedge }\webright )}\circ {\mathbf{\alpha }^{\mathsf{Cats}}_{\mathsf{Sets}_{*},\mathsf{Sets}_{*},\mathsf{Sets}_{*}}} \] -
•
The Left Unitors. The natural isomorphism
\[ \lambda ^{\mathsf{Sets}_{*}}\colon {\wedge }\circ {\webleft (\mathbb {1}^{\mathsf{Sets}_{*}}\times \operatorname {\mathrm{id}}_{\mathsf{Sets}_{*}}\webright )} \mathbin {\overset {\mathord {\sim }}{\Longrightarrow }}\mathbf{\lambda }^{\mathsf{Cats}_{\mathsf{2}}}_{\mathsf{Sets}_{*}} \] -
•
The Right Unitors. The natural isomorphism
\[ \rho ^{\mathsf{Sets}_{*}}\colon {\wedge }\circ {\webleft ({\mathsf{id}}\times {\mathbb {1}^{\mathsf{Sets}_{*}}}\webright )}\mathbin {\overset {\mathord {\sim }}{\Longrightarrow }}\mathbf{\rho }^{\mathsf{Cats}_{\mathsf{2}}}_{\mathsf{Sets}_{*}} \] -
•
The Symmetry. The natural isomorphism
\[ \sigma ^{\mathsf{Sets}_{*}} \colon {\wedge } \mathbin {\overset {\mathord {\sim }}{\Longrightarrow }}{\wedge }\circ {\mathbf{\sigma }^{\mathsf{Cats}_{\mathsf{2}}}_{\mathsf{Sets}_{*},\mathsf{Sets}_{*}}} \] -
•
The Diagonals. The monoidal natural transformation
\[ \Delta ^{\wedge }\colon \operatorname {\mathrm{id}}_{\mathsf{Sets}_{*}}\Longrightarrow \wedge \circ \Delta ^{\mathsf{Cats}_{\mathsf{2}}}_{\mathsf{Sets}_{*}} \]