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 5.5.1.1.10.
- The Internal Hom. The internal Hom functor
\[ \textbf{Sets}_{*}\colon \mathsf{Sets}^{\mathsf{op}}_{*}\times \mathsf{Sets}_{*}\to \mathsf{Sets}_{*} \]
of Item 1 of Proposition 5.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 \text{id}_{\mathsf{Sets}_{*}}\webright )} \mathbin {\overset {\mathord {\sim }}{\Longrightarrow }}{\wedge }\circ {\webleft (\text{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 \text{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 \text{id}_{\mathsf{Sets}_{*}}\Longrightarrow \wedge \circ \Delta ^{\mathsf{Cats}_{\mathsf{2}}}_{\mathsf{Sets}_{*}} \]