fact: Definition pentagon_identity {C : category} {T : tensor_data C} (α : associator_data T) : UU := ∏ (w x y z : C), ((identity w)⊗^{T} (α x y z)) ∘ ((α w (x⊗_{T} y) z) ∘ ((α w x y) ⊗^{T} (identity z))) = (α w x (y⊗_{T} z)) ∘ (α (w⊗_{T}x) y z).
imports: UniMath.Foundations.All UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Functors UniMath.CategoryTheory.Core.Isos