Documentation

LeanPool.RegtsSevenster.RS.Classical.Deligne.TwistCoherence

The twist-shuffle coherence #

The pure braid identity of the twist shuffle: routing the scalar out of the first twisted factor, through the interchange, and back into the middle equals associating it into the second factor and interchanging. Two crossings cancel by symmetry.

theorem RS.twist_shuffle_coherence {D : Type u} [CategoryTheory.Category.{v, u} D] [CategoryTheory.MonoidalCategory D] [CategoryTheory.SymmetricCategory D] (V R A W S : D) :
CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight (β_ (CategoryTheory.MonoidalCategoryStruct.tensorObj V R) A).hom (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight (CategoryTheory.MonoidalCategoryStruct.associator A V R).inv (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight (CategoryTheory.MonoidalCategoryStruct.whiskerRight (β_ A V).hom R) (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight (CategoryTheory.MonoidalCategoryStruct.associator V A R).hom (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorμ V (CategoryTheory.MonoidalCategoryStruct.tensorObj A R) W S) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerLeft (CategoryTheory.MonoidalCategoryStruct.tensorObj V W) (CategoryTheory.MonoidalCategoryStruct.whiskerRight (β_ R A).inv S)) (CategoryTheory.MonoidalCategoryStruct.whiskerLeft (CategoryTheory.MonoidalCategoryStruct.tensorObj V W) (CategoryTheory.MonoidalCategoryStruct.associator R A S).hom)))))) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.associator (CategoryTheory.MonoidalCategoryStruct.tensorObj V R) A (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)).hom (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerLeft (CategoryTheory.MonoidalCategoryStruct.tensorObj V R) (CategoryTheory.MonoidalCategoryStruct.associator A W S).inv) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerLeft (CategoryTheory.MonoidalCategoryStruct.tensorObj V R) (CategoryTheory.MonoidalCategoryStruct.whiskerRight (β_ A W).hom S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerLeft (CategoryTheory.MonoidalCategoryStruct.tensorObj V R) (CategoryTheory.MonoidalCategoryStruct.associator W A S).hom) (CategoryTheory.MonoidalCategory.tensorμ V R W (CategoryTheory.MonoidalCategoryStruct.tensorObj A S)))))

The twist-shuffle coherence: extracting A from the twisted factor V ⊗ R, interchanging, and reinserting it between R and S agrees with associating A into W ⊗ S and interchanging. The block braiding β_ (V ⊗ R) A contributes crossings of A past R and past V; the latter cancels against β_ A V by symmetry, the former is conjugated through the interchange block by naturality of the braiding and cancels against (β_ R A).inv, and the residual word is the interchange of V ⊗ R with W ⊗ (A ⊗ S).

theorem RS.twist_shuffle_coherence_assoc {D : Type u} [CategoryTheory.Category.{v, u} D] [CategoryTheory.MonoidalCategory D] [CategoryTheory.SymmetricCategory D] (V R A W S : D) {Z : D} (h : CategoryTheory.MonoidalCategoryStruct.tensorObj (CategoryTheory.MonoidalCategoryStruct.tensorObj V W) (CategoryTheory.MonoidalCategoryStruct.tensorObj R (CategoryTheory.MonoidalCategoryStruct.tensorObj A S)) ⟶ Z) :
CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight (β_ (CategoryTheory.MonoidalCategoryStruct.tensorObj V R) A).hom (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight (CategoryTheory.MonoidalCategoryStruct.associator A V R).inv (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight (CategoryTheory.MonoidalCategoryStruct.whiskerRight (β_ A V).hom R) (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight (CategoryTheory.MonoidalCategoryStruct.associator V A R).hom (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorμ V (CategoryTheory.MonoidalCategoryStruct.tensorObj A R) W S) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerLeft (CategoryTheory.MonoidalCategoryStruct.tensorObj V W) (CategoryTheory.MonoidalCategoryStruct.whiskerRight (β_ R A).inv S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerLeft (CategoryTheory.MonoidalCategoryStruct.tensorObj V W) (CategoryTheory.MonoidalCategoryStruct.associator R A S).hom) h)))))) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.associator (CategoryTheory.MonoidalCategoryStruct.tensorObj V R) A (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)).hom (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerLeft (CategoryTheory.MonoidalCategoryStruct.tensorObj V R) (CategoryTheory.MonoidalCategoryStruct.associator A W S).inv) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerLeft (CategoryTheory.MonoidalCategoryStruct.tensorObj V R) (CategoryTheory.MonoidalCategoryStruct.whiskerRight (β_ A W).hom S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerLeft (CategoryTheory.MonoidalCategoryStruct.tensorObj V R) (CategoryTheory.MonoidalCategoryStruct.associator W A S).hom) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorμ V R W (CategoryTheory.MonoidalCategoryStruct.tensorObj A S)) h))))

The twist-shuffle coherence: extracting A from the twisted factor V ⊗ R, interchanging, and reinserting it between R and S agrees with associating A into W ⊗ S and interchanging. The block braiding β_ (V ⊗ R) A contributes crossings of A past R and past V; the latter cancels against β_ A V by symmetry, the former is conjugated through the interchange block by naturality of the braiding and cancels against (β_ R A).inv, and the residual word is the interchange of V ⊗ R with W ⊗ (A ⊗ S).

theorem RS.twist_act_coherence {D : Type u} [CategoryTheory.Category.{v, u} D] [CategoryTheory.MonoidalCategory D] [CategoryTheory.SymmetricCategory D] (A V R W S : D) :
CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.associator A (CategoryTheory.MonoidalCategoryStruct.tensorObj V R) (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)).inv (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight (CategoryTheory.MonoidalCategoryStruct.associator A V R).inv (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight (CategoryTheory.MonoidalCategoryStruct.whiskerRight (β_ A V).hom R) (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight (CategoryTheory.MonoidalCategoryStruct.associator V A R).hom (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)) (CategoryTheory.MonoidalCategory.tensorμ V (CategoryTheory.MonoidalCategoryStruct.tensorObj A R) W S)))) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerLeft A (CategoryTheory.MonoidalCategory.tensorμ V R W S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.associator A (CategoryTheory.MonoidalCategoryStruct.tensorObj V W) (CategoryTheory.MonoidalCategoryStruct.tensorObj R S)).inv (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight (β_ A (CategoryTheory.MonoidalCategoryStruct.tensorObj V W)).hom (CategoryTheory.MonoidalCategoryStruct.tensorObj R S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.associator (CategoryTheory.MonoidalCategoryStruct.tensorObj V W) A (CategoryTheory.MonoidalCategoryStruct.tensorObj R S)).hom (CategoryTheory.MonoidalCategoryStruct.whiskerLeft (CategoryTheory.MonoidalCategoryStruct.tensorObj V W) (CategoryTheory.MonoidalCategoryStruct.associator A R S).inv))))

The twist-act coherence: extracting A from the twisted factor V ⊗ R before the interchange agrees with interchanging first and then extracting A from the product V ⊗ W. Both words consist of the crossings of A past V, of R past W, and of A past W, each occurring exactly once; the two sides differ only in the order of the first two, which act on disjoint factors and are exchanged as whiskerings.

theorem RS.twist_act_coherence_assoc {D : Type u} [CategoryTheory.Category.{v, u} D] [CategoryTheory.MonoidalCategory D] [CategoryTheory.SymmetricCategory D] (A V R W S : D) {Z : D} (h : CategoryTheory.MonoidalCategoryStruct.tensorObj (CategoryTheory.MonoidalCategoryStruct.tensorObj V W) (CategoryTheory.MonoidalCategoryStruct.tensorObj (CategoryTheory.MonoidalCategoryStruct.tensorObj A R) S) ⟶ Z) :
CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.associator A (CategoryTheory.MonoidalCategoryStruct.tensorObj V R) (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)).inv (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight (CategoryTheory.MonoidalCategoryStruct.associator A V R).inv (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight (CategoryTheory.MonoidalCategoryStruct.whiskerRight (β_ A V).hom R) (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight (CategoryTheory.MonoidalCategoryStruct.associator V A R).hom (CategoryTheory.MonoidalCategoryStruct.tensorObj W S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorμ V (CategoryTheory.MonoidalCategoryStruct.tensorObj A R) W S) h)))) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerLeft A (CategoryTheory.MonoidalCategory.tensorμ V R W S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.associator A (CategoryTheory.MonoidalCategoryStruct.tensorObj V W) (CategoryTheory.MonoidalCategoryStruct.tensorObj R S)).inv (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight (β_ A (CategoryTheory.MonoidalCategoryStruct.tensorObj V W)).hom (CategoryTheory.MonoidalCategoryStruct.tensorObj R S)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.associator (CategoryTheory.MonoidalCategoryStruct.tensorObj V W) A (CategoryTheory.MonoidalCategoryStruct.tensorObj R S)).hom (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerLeft (CategoryTheory.MonoidalCategoryStruct.tensorObj V W) (CategoryTheory.MonoidalCategoryStruct.associator A R S).inv) h))))

The twist-act coherence: extracting A from the twisted factor V ⊗ R before the interchange agrees with interchanging first and then extracting A from the product V ⊗ W. Both words consist of the crossings of A past V, of R past W, and of A past W, each occurring exactly once; the two sides differ only in the order of the first two, which act on disjoint factors and are exchanged as whiskerings.