Module

RootScaling.lean

Nyll.EtaleFundamentalGroups.Kummer.AdjoinRoot.RootScaling
6 declarations indexed from sourceView source ↗

Actual root-of-unity automorphisms of the Kummer algebra

Multiplication of the adjoined root by a root of unity gives an actual algebra automorphism. No irreducibility or domain hypothesis on the Kummer algebra is needed, so the construction includes disconnected Kummer covers.

Declarations

JacobianVarieties.Kummer.kummerRoot_pow
Source context 4 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
universe u
namespace JacobianVarieties.Kummer
variable {R : Type u} [CommRing R] (n : ℕ) (a : R)
theorem kummerRoot_pow :
    AdjoinRoot.root (Polynomial.X ^ n - Polynomial.C a : Polynomial R) ^ n =
      algebraMap R (AdjoinRoot (Polynomial.X ^ n - Polynomial.C a : Polynomial R)) a
JacobianVarieties.Kummer.kummerRootScale

Scale the adjoined Kummer root by the specified root of unity.

Source context 4 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
universe u
namespace JacobianVarieties.Kummer
variable {R : Type u} [CommRing R] (n : ℕ) (a : R)
def kummerRootScale (ζ : rootsOfUnity n R) :
    AdjoinRoot (Polynomial.X ^ n - Polynomial.C a : Polynomial R) →ₐ[R]
      AdjoinRoot (Polynomial.X ^ n - Polynomial.C a : Polynomial R)
JacobianVarieties.Kummer.kummerRootScale_root

The constructed algebra endomorphism sends the actual root to its scale.

Source context 4 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
universe u
namespace JacobianVarieties.Kummer
variable {R : Type u} [CommRing R] (n : ℕ) (a : R)
theorem kummerRootScale_root (ζ : rootsOfUnity n R) :
    kummerRootScale n a ζ (AdjoinRoot.root _) =
      algebraMap R _ (ζ.val : R) * AdjoinRoot.root _
JacobianVarieties.Kummer.kummerRootScale_one

Scaling by one is the identity on the original Kummer algebra.

Source context 4 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
universe u
namespace JacobianVarieties.Kummer
variable {R : Type u} [CommRing R] (n : ℕ) (a : R)
theorem kummerRootScale_one : kummerRootScale n a 1 = AlgHom.id R _
JacobianVarieties.Kummer.kummerRootScale_mul

Composition of the actual root scalings is multiplication of their coefficients.

Source context 4 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
universe u
namespace JacobianVarieties.Kummer
variable {R : Type u} [CommRing R] (n : ℕ) (a : R)
theorem kummerRootScale_mul (ζ η : rootsOfUnity n R) :
    kummerRootScale n a (ζ * η) = (kummerRootScale n a ζ).comp (kummerRootScale n a η)
JacobianVarieties.Kummer.kummerRootScaleEquiv

Every root scaling is an algebra automorphism, with inverse scaling by the inverse root.

Source context 4 commands

Surrounding namespaces, section variables, and local commands at this declaration.

noncomputable section
universe u
namespace JacobianVarieties.Kummer
variable {R : Type u} [CommRing R] (n : ℕ) (a : R)
def kummerRootScaleEquiv (ζ : rootsOfUnity n R) :
    AdjoinRoot (Polynomial.X ^ n - Polynomial.C a : Polynomial R) ≃ₐ[R]
      AdjoinRoot (Polynomial.X ^ n - Polynomial.C a : Polynomial R)