Documentation

LeanPool.RegtsSevenster.RS.Classical.Deligne.PointMonoidal.Calculus

A point-free calculus for the two tensor products #

The laws of the comparison are proved by evaluating both sides on generators. This module collects the evaluations: the structural morphisms of the category of super modules over a super-commutative algebra, and of RS.SuperVect, applied to a generator of a tensor product, together with the extensionality principles that reduce an identity of maps out of a twofold or threefold graded tensor product to its values on generators. The comparison itself is defined in Comparison.lean and its laws are proved in Coherence.lean.

Contents #

One-step computations on generators #

The whiskerings, the associator and the unitors of the super modules, and the whiskerings and associator of the super vector spaces, evaluated on the generators of a tensor product. Each is an instance of a computation lemma of the construction; they are collected here so that the coherence proofs below rewrite with concrete equations only.

theorem RS.modComp_evenMap_apply {S : SuperCommAlgebra} {X Y Z : S.Mod} (f : X ⟶ Y) (g : Y ⟶ Z) (x : X.even) :

Composition of super module morphisms, even degree, on an element.

theorem RS.modComp_oddMap_apply {S : SuperCommAlgebra} {X Y Z : S.Mod} (f : X ⟶ Y) (g : Y ⟶ Z) (x : X.odd) :

Composition of super module morphisms, odd degree, on an element.

theorem RS.whiskerRight_evenMap_tmulEE {S : SuperCommAlgebra} {X Y : S.Mod} (f : X ⟶ Y) (C : S.Mod) (x : X.even) (c : C.even) :

Right whiskering on an even-even generator.

theorem RS.whiskerRight_evenMap_tmulOO {S : SuperCommAlgebra} {X Y : S.Mod} (f : X ⟶ Y) (C : S.Mod) (x : X.odd) (c : C.odd) :

Right whiskering on an odd-odd generator.

theorem RS.whiskerRight_oddMap_tmulEO {S : SuperCommAlgebra} {X Y : S.Mod} (f : X ⟶ Y) (C : S.Mod) (x : X.even) (c : C.odd) :

Right whiskering on an even-odd generator.

theorem RS.whiskerRight_oddMap_tmulOE {S : SuperCommAlgebra} {X Y : S.Mod} (f : X ⟶ Y) (C : S.Mod) (x : X.odd) (c : C.even) :

Right whiskering on an odd-even generator.

theorem RS.whiskerLeft_evenMap_tmulEE {S : SuperCommAlgebra} {X Y : S.Mod} (f : X ⟶ Y) (C : S.Mod) (a : C.even) (x : X.even) :

Left whiskering on an even-even generator.

theorem RS.whiskerLeft_evenMap_tmulOO {S : SuperCommAlgebra} {X Y : S.Mod} (f : X ⟶ Y) (C : S.Mod) (a : C.odd) (x : X.odd) :

Left whiskering on an odd-odd generator.

theorem RS.whiskerLeft_oddMap_tmulEO {S : SuperCommAlgebra} {X Y : S.Mod} (f : X ⟶ Y) (C : S.Mod) (a : C.even) (x : X.odd) :

Left whiskering on an even-odd generator.

theorem RS.whiskerLeft_oddMap_tmulOE {S : SuperCommAlgebra} {X Y : S.Mod} (f : X ⟶ Y) (C : S.Mod) (a : C.odd) (x : X.even) :

Left whiskering on an odd-even generator.

theorem RS.actEE_span_one {S : SuperCommAlgebra} {X : S.Mod} (r : ℂ) (z : X.even) :

A scalar multiple of the unit acts by that scalar, in even degree.

theorem RS.actEO_span_one {S : SuperCommAlgebra} {X : S.Mod} (r : ℂ) (z : X.odd) :

A scalar multiple of the unit acts by that scalar, in odd degree.

theorem RS.mcTensorHom_evenMap_tmulEE {S : SuperCommAlgebra} {X Y X' Y' : S.Mod} (f : X ⟶ Y) (g : X' ⟶ Y') (m : X.even) (n : X'.even) :

The monoidal tensor of two morphisms on an even-even generator.

theorem RS.mcTensorHom_evenMap_tmulOO {S : SuperCommAlgebra} {X Y X' Y' : S.Mod} (f : X ⟶ Y) (g : X' ⟶ Y') (m : X.odd) (n : X'.odd) :

The monoidal tensor of two morphisms on an odd-odd generator.

theorem RS.mcTensorHom_oddMap_tmulEO {S : SuperCommAlgebra} {X Y X' Y' : S.Mod} (f : X ⟶ Y) (g : X' ⟶ Y') (m : X.even) (n : X'.odd) :

The monoidal tensor of two morphisms on an even-odd generator.

theorem RS.mcTensorHom_oddMap_tmulOE {S : SuperCommAlgebra} {X Y X' Y' : S.Mod} (f : X ⟶ Y) (g : X' ⟶ Y') (m : X.odd) (n : X'.even) :

The monoidal tensor of two morphisms on an odd-even generator.

theorem RS.modAssoc_evenMap_ee {S : SuperCommAlgebra} (M N Q : S.Mod) (m : M.even) (n : N.even) (q : Q.even) :
(CategoryTheory.MonoidalCategoryStruct.associator M N Q).hom.evenMap ((((M.tensor N).tmulEE Q) (((M.tmulEE N) m) n)) q) = ((M.tmulEE (N.tensor Q)) m) (((N.tmulEE Q) n) q)

The associator on the even-even-even generators.

theorem RS.modAssoc_evenMap_oo {S : SuperCommAlgebra} (M N Q : S.Mod) (m : M.odd) (n : N.odd) (q : Q.even) :
(CategoryTheory.MonoidalCategoryStruct.associator M N Q).hom.evenMap ((((M.tensor N).tmulEE Q) (((M.tmulOO N) m) n)) q) = ((M.tmulOO (N.tensor Q)) m) (((N.tmulOE Q) n) q)

The associator on the odd-odd-even generators.

theorem RS.modAssoc_evenMap_eo {S : SuperCommAlgebra} (M N Q : S.Mod) (m : M.even) (n : N.odd) (q : Q.odd) :
(CategoryTheory.MonoidalCategoryStruct.associator M N Q).hom.evenMap ((((M.tensor N).tmulOO Q) (((M.tmulEO N) m) n)) q) = ((M.tmulEE (N.tensor Q)) m) (((N.tmulOO Q) n) q)

The associator on the even-odd-odd generators.

theorem RS.modAssoc_evenMap_oe {S : SuperCommAlgebra} (M N Q : S.Mod) (m : M.odd) (n : N.even) (q : Q.odd) :
(CategoryTheory.MonoidalCategoryStruct.associator M N Q).hom.evenMap ((((M.tensor N).tmulOO Q) (((M.tmulOE N) m) n)) q) = ((M.tmulOO (N.tensor Q)) m) (((N.tmulEO Q) n) q)

The associator on the odd-even-odd generators.

theorem RS.modAssoc_oddMap_ee {S : SuperCommAlgebra} (M N Q : S.Mod) (m : M.even) (n : N.even) (q : Q.odd) :
(CategoryTheory.MonoidalCategoryStruct.associator M N Q).hom.oddMap ((((M.tensor N).tmulEO Q) (((M.tmulEE N) m) n)) q) = ((M.tmulEO (N.tensor Q)) m) (((N.tmulEO Q) n) q)

The associator on the even-even-odd generators.

theorem RS.modAssoc_oddMap_oo {S : SuperCommAlgebra} (M N Q : S.Mod) (m : M.odd) (n : N.odd) (q : Q.odd) :
(CategoryTheory.MonoidalCategoryStruct.associator M N Q).hom.oddMap ((((M.tensor N).tmulEO Q) (((M.tmulOO N) m) n)) q) = ((M.tmulOE (N.tensor Q)) m) (((N.tmulOO Q) n) q)

The associator on the odd-odd-odd generators.

theorem RS.modAssoc_oddMap_eo {S : SuperCommAlgebra} (M N Q : S.Mod) (m : M.even) (n : N.odd) (q : Q.even) :
(CategoryTheory.MonoidalCategoryStruct.associator M N Q).hom.oddMap ((((M.tensor N).tmulOE Q) (((M.tmulEO N) m) n)) q) = ((M.tmulEO (N.tensor Q)) m) (((N.tmulOE Q) n) q)

The associator on the even-odd-even generators.

theorem RS.modAssoc_oddMap_oe {S : SuperCommAlgebra} (M N Q : S.Mod) (m : M.odd) (n : N.even) (q : Q.even) :
(CategoryTheory.MonoidalCategoryStruct.associator M N Q).hom.oddMap ((((M.tensor N).tmulOE Q) (((M.tmulOE N) m) n)) q) = ((M.tmulOE (N.tensor Q)) m) (((N.tmulEE Q) n) q)

The associator on the odd-even-even generators.

Right whiskering of super vector spaces, first summand.

Right whiskering of super vector spaces, second summand.

Right whiskering of super vector spaces, odd degree, first summand.

Right whiskering of super vector spaces, odd degree, second summand.

Left whiskering of super vector spaces, first summand.

Left whiskering of super vector spaces, second summand.

Left whiskering of super vector spaces, odd degree, first summand.

Left whiskering of super vector spaces, odd degree, second summand.

theorem RS.svComp_evenMap_apply {V W Y : SuperVect} (f : V ⟶ W) (g : W ⟶ Y) (x : V.even) :

Composition of super vector space morphisms, even degree, on an element.

theorem RS.svComp_oddMap_apply {V W Y : SuperVect} (f : V ⟶ W) (g : W ⟶ Y) (x : V.odd) :

Composition of super vector space morphisms, odd degree, on an element.

theorem RS.svBraiding_evenMap_inl (V W : SuperVect) (x : V.even) (y : W.even) :

The Koszul braiding on an even-even generator.

theorem RS.svBraiding_evenMap_inr (V W : SuperVect) (x : V.odd) (y : W.odd) :

The Koszul braiding on an odd-odd generator: this is where the sign lives.

theorem RS.svBraiding_oddMap_inl (V W : SuperVect) (x : V.even) (y : W.odd) :

The Koszul braiding on an even-odd generator.

theorem RS.svBraiding_oddMap_inr (V W : SuperVect) (x : V.odd) (y : W.even) :

The Koszul braiding on an odd-even generator.

The associator of super vector spaces on an even-even-even generator.

The associator on an odd-odd-even generator.

The associator on an even-odd-odd generator.

The associator on an odd-even-odd generator.

The associator on an even-even-odd generator.

The associator on an odd-odd-odd generator.

The associator on an even-odd-even generator.

The associator on an odd-even-even generator.

The left unitor of super vector spaces on the first summand.

The left unitor in odd degree, on the first summand.

The right unitor of super vector spaces on the first summand.

The right unitor in odd degree, on the second summand.

Extensionality for a threefold graded tensor product #

theorem RS.gradedTriple_ext {A₁ : Type u_1} {A₂ : Type u_2} {B₁ : Type u_3} {B₂ : Type u_4} {C₁ : Type u_5} {C₂ : Type u_6} [AddCommGroup A₁] [Module ℂ A₁] [AddCommGroup A₂] [Module ℂ A₂] [AddCommGroup B₁] [Module ℂ B₁] [AddCommGroup B₂] [Module ℂ B₂] [AddCommGroup C₁] [Module ℂ C₁] [AddCommGroup C₂] [Module ℂ C₂] {Z : Type u_7} [AddCommGroup Z] [Module ℂ Z] {f g : TensorProduct ℂ (TensorProduct ℂ A₁ B₁ × TensorProduct ℂ A₂ B₂) C₁ × TensorProduct ℂ (TensorProduct ℂ A₁ B₂ × TensorProduct ℂ A₂ B₁) C₂ →ₗ[ℂ] Z} (h₁ : ∀ (a : A₁) (b : B₁) (c : C₁), f ((a ⊗ₜ[ℂ] b, 0) ⊗ₜ[ℂ] c, 0) = g ((a ⊗ₜ[ℂ] b, 0) ⊗ₜ[ℂ] c, 0)) (h₂ : ∀ (a : A₂) (b : B₂) (c : C₁), f ((0, a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c, 0) = g ((0, a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c, 0)) (h₃ : ∀ (a : A₁) (b : B₂) (c : C₂), f (0, (a ⊗ₜ[ℂ] b, 0) ⊗ₜ[ℂ] c) = g (0, (a ⊗ₜ[ℂ] b, 0) ⊗ₜ[ℂ] c)) (h₄ : ∀ (a : A₂) (b : B₁) (c : C₂), f (0, (0, a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c) = g (0, (0, a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c)) :
f = g

Two linear maps out of a threefold graded tensor product agree as soon as they agree on the four families of generators. Both components of a threefold product of super vector spaces are of this shape, the two C-slots taken in the two orders.

theorem RS.superVectTripleEven_ext {V W X : SuperVect} {Z : Type u_1} [AddCommGroup Z] [Module ℂ Z] {f g : (CategoryTheory.MonoidalCategoryStruct.tensorObj (CategoryTheory.MonoidalCategoryStruct.tensorObj V W) X).even →ₗ[ℂ] Z} (h₁ : ∀ (a : V.even) (b : W.even) (c : X.even), f (svEvenInl (svEvenInl (a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c)) = g (svEvenInl (svEvenInl (a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c))) (h₂ : ∀ (a : V.odd) (b : W.odd) (c : X.even), f (svEvenInl (svEvenInr (a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c)) = g (svEvenInl (svEvenInr (a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c))) (h₃ : ∀ (a : V.even) (b : W.odd) (c : X.odd), f (svEvenInr (svOddInl (a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c)) = g (svEvenInr (svOddInl (a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c))) (h₄ : ∀ (a : V.odd) (b : W.even) (c : X.odd), f (svEvenInr (svOddInr (a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c)) = g (svEvenInr (svOddInr (a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c))) :
f = g

Extensionality for the even part of a threefold product of super vector spaces.

theorem RS.superVectTripleOdd_ext {V W X : SuperVect} {Z : Type u_1} [AddCommGroup Z] [Module ℂ Z] {f g : (CategoryTheory.MonoidalCategoryStruct.tensorObj (CategoryTheory.MonoidalCategoryStruct.tensorObj V W) X).odd →ₗ[ℂ] Z} (h₁ : ∀ (a : V.even) (b : W.even) (c : X.odd), f (svOddInl (svEvenInl (a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c)) = g (svOddInl (svEvenInl (a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c))) (h₂ : ∀ (a : V.odd) (b : W.odd) (c : X.odd), f (svOddInl (svEvenInr (a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c)) = g (svOddInl (svEvenInr (a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c))) (h₃ : ∀ (a : V.even) (b : W.odd) (c : X.even), f (svOddInr (svOddInl (a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c)) = g (svOddInr (svOddInl (a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c))) (h₄ : ∀ (a : V.odd) (b : W.even) (c : X.even), f (svOddInr (svOddInr (a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c)) = g (svOddInr (svOddInr (a ⊗ₜ[ℂ] b) ⊗ₜ[ℂ] c))) :
f = g

Extensionality for the odd part of a threefold product of super vector spaces.

theorem RS.superVectPairEven_ext {V W : SuperVect} {Z : Type u_1} [AddCommGroup Z] [Module ℂ Z] {f g : (CategoryTheory.MonoidalCategoryStruct.tensorObj V W).even →ₗ[ℂ] Z} (h₁ : ∀ (a : V.even) (b : W.even), f (svEvenInl (a ⊗ₜ[ℂ] b)) = g (svEvenInl (a ⊗ₜ[ℂ] b))) (h₂ : ∀ (a : V.odd) (b : W.odd), f (svEvenInr (a ⊗ₜ[ℂ] b)) = g (svEvenInr (a ⊗ₜ[ℂ] b))) :
f = g

Extensionality for the even part of a product of super vector spaces.

theorem RS.superVectPairOdd_ext {V W : SuperVect} {Z : Type u_1} [AddCommGroup Z] [Module ℂ Z] {f g : (CategoryTheory.MonoidalCategoryStruct.tensorObj V W).odd →ₗ[ℂ] Z} (h₁ : ∀ (a : V.even) (b : W.odd), f (svOddInl (a ⊗ₜ[ℂ] b)) = g (svOddInl (a ⊗ₜ[ℂ] b))) (h₂ : ∀ (a : V.odd) (b : W.even), f (svOddInr (a ⊗ₜ[ℂ] b)) = g (svOddInr (a ⊗ₜ[ℂ] b))) :
f = g

Extensionality for the odd part of a product of super vector spaces.