Definition monoidal_to_tensor_unit_unitors_associator {C : category} (M : monoidal C) : tensor_unit_unitors_associator C. Proof. exists (monoidal_to_tensor_unit M). repeat split. - exists (monoidal_leftunitordata M). exact (monoidal_leftunitornat M). - exists (monoidal_rightunitordata M). exact (monoidal_rightunitornat M). - exists (monoidal_associatordata M). exists (monoidal_associatornatleft M). exists (monoidal_associatornatright M). exact (monoidal_associatornatleftright M). Defined.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.CategoryTheory.Core.Categories. Require Import UniMath.CategoryTheory.Monoidal.WhiskeredBifunctors. Require Import UniMath.CategoryTheory.Monoidal.Categories.