Module

NormalizationSeparableRoots.lean

Nyll.EtaleFundamentalGroups.Inertia.NormalizationSeparableRoots
13 declarations indexed from sourceView source ↗

The full separable roots target of the original normalization

The residue field, its algebra, and the relative separable closure are constructed once in the existing field owner. This layer contains no fraction-field or original decomposition-group data.

Declarations

EtaleFundamentalGroups.Inertia.normalizationSeparableRootsGroup

The full invertible-exponent roots limit in the actual relative separable closure.

Source context 5 commands

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

noncomputable section
namespace EtaleFundamentalGroups.Inertia
open CategoryTheory SchemeTheory ProCGroups.InverseSystems
universe u w
variable (A : Type u) (Ω : Type w) [CommRing A] [IsLocalRing A]
  [CommRing Ω] [Algebra A Ω]
  (Q : Ideal (normalizationCommAlgCat A Ω).carrier) [Q.IsMaximal]
def normalizationSeparableRootsGroup : GrpCat.{w}
EtaleFundamentalGroups.Inertia.normalizationSeparableRootsGroup_topology
Source context 5 commands

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

noncomputable section
namespace EtaleFundamentalGroups.Inertia
open CategoryTheory SchemeTheory ProCGroups.InverseSystems
universe u w
variable (A : Type u) (Ω : Type w) [CommRing A] [IsLocalRing A]
  [CommRing Ω] [Algebra A Ω]
  (Q : Ideal (normalizationCommAlgCat A Ω).carrier) [Q.IsMaximal]
instance normalizationSeparableRootsGroup_topology :
    TopologicalSpace (normalizationSeparableRootsGroup A Ω Q).carrier
EtaleFundamentalGroups.Inertia.normalizationSeparableRootsScalar

A full separable-root coordinate viewed in the literal normalization quotient.

Source context 5 commands

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

noncomputable section
namespace EtaleFundamentalGroups.Inertia
open CategoryTheory SchemeTheory ProCGroups.InverseSystems
universe u w
variable (A : Type u) (Ω : Type w) [CommRing A] [IsLocalRing A]
  [CommRing Ω] [Algebra A Ω]
  (Q : Ideal (normalizationCommAlgCat A Ω).carrier) [Q.IsMaximal]
def normalizationSeparableRootsScalar
    (n : InvertibleExponent (IsLocalRing.ResidueField A))
    (x : (normalizationSeparableRootsGroup A Ω Q).carrier) :
    (normalizationCommAlgCat A Ω).carrier ⧸ Q
EtaleFundamentalGroups.Inertia.normalizationSeparableRootsAction

The same separable residue group acts through its actual coefficient action.

Source context 5 commands

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

noncomputable section
namespace EtaleFundamentalGroups.Inertia
open CategoryTheory SchemeTheory ProCGroups.InverseSystems
universe u w
variable (A : Type u) (Ω : Type w) [CommRing A] [IsLocalRing A]
  [CommRing Ω] [Algebra A Ω]
  (Q : Ideal (normalizationCommAlgCat A Ω).carrier) [Q.IsMaximal]
def normalizationSeparableRootsAction :
    (normalizationResidueSeparableGroup A Ω Q).carrier →*
      Equiv.Perm (normalizationSeparableRootsGroup A Ω Q).carrier
EtaleFundamentalGroups.Inertia.normalizationSeparableRootsAction_apply

Plain application closes the action's permutation data in this owner.

Source context 5 commands

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

noncomputable section
namespace EtaleFundamentalGroups.Inertia
open CategoryTheory SchemeTheory ProCGroups.InverseSystems
universe u w
variable (A : Type u) (Ω : Type w) [CommRing A] [IsLocalRing A]
  [CommRing Ω] [Algebra A Ω]
  (Q : Ideal (normalizationCommAlgCat A Ω).carrier) [Q.IsMaximal]
def normalizationSeparableRootsAction_apply
    (σ : (normalizationResidueSeparableGroup A Ω Q).carrier)
    (x : (normalizationSeparableRootsGroup A Ω Q).carrier) :
    (normalizationSeparableRootsGroup A Ω Q).carrier
EtaleFundamentalGroups.Inertia.normalizationSeparableRootsRestrictionEquiv

Comparison with any cofinal subsystem of the literal quotient roots.

Source context 5 commands

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

noncomputable section
namespace EtaleFundamentalGroups.Inertia
open CategoryTheory SchemeTheory ProCGroups.InverseSystems
universe u w
variable (A : Type u) (Ω : Type w) [CommRing A] [IsLocalRing A]
  [CommRing Ω] [Algebra A Ω]
  (Q : Ideal (normalizationCommAlgCat A Ω).carrier) [Q.IsMaximal]
def normalizationSeparableRootsRestrictionEquiv
    (T : Set (InvertibleExponent (IsLocalRing.ResidueField A)))
    (hT : ∀ n : InvertibleExponent (IsLocalRing.ResidueField A),
      ∃ t : T, n ≤ t.val) :
    (normalizationSeparableRootsGroup A Ω Q).carrier ≃ₜ*
      (nativeRestrictedRootsGroup (IsLocalRing.ResidueField A)
        (normalizationResidueFieldObject A Ω Q) T).carrier
EtaleFundamentalGroups.Inertia.normalizationSeparableRootsRestrictionEquiv_scalar

The comparison is specified by the actual inclusion on retained scalar coordinates.

Source context 5 commands

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

noncomputable section
namespace EtaleFundamentalGroups.Inertia
open CategoryTheory SchemeTheory ProCGroups.InverseSystems
universe u w
variable (A : Type u) (Ω : Type w) [CommRing A] [IsLocalRing A]
  [CommRing Ω] [Algebra A Ω]
  (Q : Ideal (normalizationCommAlgCat A Ω).carrier) [Q.IsMaximal]
theorem normalizationSeparableRootsRestrictionEquiv_scalar
    (T : Set (InvertibleExponent (IsLocalRing.ResidueField A)))
    (hT : ∀ n : InvertibleExponent (IsLocalRing.ResidueField A),
      ∃ t : T, n ≤ t.val) (t : T)
    (x : (normalizationSeparableRootsGroup A Ω Q).carrier) :
    nativeRestrictedRootsScalar (IsLocalRing.ResidueField A)
      (normalizationResidueFieldObject A Ω Q) T t
        ((normalizationSeparableRootsRestrictionEquiv A Ω Q T hT).toFun x) =
      normalizationSeparableRootsScalar A Ω Q t.val x
EtaleFundamentalGroups.Inertia.normalizationSeparableRootsRestrictionMap

The literal forward comparison, with group and topology dictionaries closed in this owner.

Source context 5 commands

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

noncomputable section
namespace EtaleFundamentalGroups.Inertia
open CategoryTheory SchemeTheory ProCGroups.InverseSystems
universe u w
variable (A : Type u) (Ω : Type w) [CommRing A] [IsLocalRing A]
  [CommRing Ω] [Algebra A Ω]
  (Q : Ideal (normalizationCommAlgCat A Ω).carrier) [Q.IsMaximal]
def normalizationSeparableRootsRestrictionMap
    (T : Set (InvertibleExponent (IsLocalRing.ResidueField A)))
    (hT : ∀ n : InvertibleExponent (IsLocalRing.ResidueField A),
      ∃ t : T, n ≤ t.val) :
    (normalizationSeparableRootsGroup A Ω Q).carrier →
      (nativeRestrictedRootsGroup (IsLocalRing.ResidueField A)
        (normalizationResidueFieldObject A Ω Q) T).carrier
EtaleFundamentalGroups.Inertia.normalizationSeparableRootsRestrictionMap_scalar

Scalar computation for the plain forward map requires no topology at the consumer.

Source context 5 commands

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

noncomputable section
namespace EtaleFundamentalGroups.Inertia
open CategoryTheory SchemeTheory ProCGroups.InverseSystems
universe u w
variable (A : Type u) (Ω : Type w) [CommRing A] [IsLocalRing A]
  [CommRing Ω] [Algebra A Ω]
  (Q : Ideal (normalizationCommAlgCat A Ω).carrier) [Q.IsMaximal]
theorem normalizationSeparableRootsRestrictionMap_scalar
    (T : Set (InvertibleExponent (IsLocalRing.ResidueField A)))
    (hT : ∀ n : InvertibleExponent (IsLocalRing.ResidueField A),
      ∃ t : T, n ≤ t.val) (t : T)
    (x : (normalizationSeparableRootsGroup A Ω Q).carrier) :
    nativeRestrictedRootsScalar (IsLocalRing.ResidueField A)
      (normalizationResidueFieldObject A Ω Q) T t
        (normalizationSeparableRootsRestrictionMap A Ω Q T hT x) =
      normalizationSeparableRootsScalar A Ω Q t.val x
EtaleFundamentalGroups.Inertia.normalizationSeparableRootsRestrictionHomeomorph

The actual comparison's homeomorphism, before the original degree data is supplied.

Source context 5 commands

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

noncomputable section
namespace EtaleFundamentalGroups.Inertia
open CategoryTheory SchemeTheory ProCGroups.InverseSystems
universe u w
variable (A : Type u) (Ω : Type w) [CommRing A] [IsLocalRing A]
  [CommRing Ω] [Algebra A Ω]
  (Q : Ideal (normalizationCommAlgCat A Ω).carrier) [Q.IsMaximal]
def normalizationSeparableRootsRestrictionHomeomorph
    (T : Set (InvertibleExponent (IsLocalRing.ResidueField A)))
    (hT : ∀ n : InvertibleExponent (IsLocalRing.ResidueField A),
      ∃ t : T, n ≤ t.val) :
    (normalizationSeparableRootsGroup A Ω Q).carrier ≃ₜ
      (nativeRestrictedRootsGroup (IsLocalRing.ResidueField A)
        (normalizationResidueFieldObject A Ω Q) T).carrier
EtaleFundamentalGroups.Inertia.normalizationSeparableRootsRestrictionHomeomorph_toFun

The homeomorphism and plain compatible-family comparison share the exact forward function.

Source context 5 commands

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

noncomputable section
namespace EtaleFundamentalGroups.Inertia
open CategoryTheory SchemeTheory ProCGroups.InverseSystems
universe u w
variable (A : Type u) (Ω : Type w) [CommRing A] [IsLocalRing A]
  [CommRing Ω] [Algebra A Ω]
  (Q : Ideal (normalizationCommAlgCat A Ω).carrier) [Q.IsMaximal]
theorem normalizationSeparableRootsRestrictionHomeomorph_toFun
    (T : Set (InvertibleExponent (IsLocalRing.ResidueField A)))
    (hT : ∀ n : InvertibleExponent (IsLocalRing.ResidueField A),
      ∃ t : T, n ≤ t.val) :
    (normalizationSeparableRootsRestrictionHomeomorph A Ω Q T hT).toFun =
      normalizationSeparableRootsRestrictionMap A Ω Q T hT
EtaleFundamentalGroups.Inertia.normalizationSeparableRootsRestrictionMulEquiv

The actual comparison's multiplicative equivalence, independently of its topology.

Source context 5 commands

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

noncomputable section
namespace EtaleFundamentalGroups.Inertia
open CategoryTheory SchemeTheory ProCGroups.InverseSystems
universe u w
variable (A : Type u) (Ω : Type w) [CommRing A] [IsLocalRing A]
  [CommRing Ω] [Algebra A Ω]
  (Q : Ideal (normalizationCommAlgCat A Ω).carrier) [Q.IsMaximal]
def normalizationSeparableRootsRestrictionMulEquiv
    (T : Set (InvertibleExponent (IsLocalRing.ResidueField A)))
    (hT : ∀ n : InvertibleExponent (IsLocalRing.ResidueField A),
      ∃ t : T, n ≤ t.val) :
    (normalizationSeparableRootsGroup A Ω Q).carrier ≃*
      (nativeRestrictedRootsGroup (IsLocalRing.ResidueField A)
        (normalizationResidueFieldObject A Ω Q) T).carrier
EtaleFundamentalGroups.Inertia.normalizationSeparableRootsRestrictionHomeomorph_scalar

The topology-only comparison still retains precisely the same included scalar.

Source context 5 commands

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

noncomputable section
namespace EtaleFundamentalGroups.Inertia
open CategoryTheory SchemeTheory ProCGroups.InverseSystems
universe u w
variable (A : Type u) (Ω : Type w) [CommRing A] [IsLocalRing A]
  [CommRing Ω] [Algebra A Ω]
  (Q : Ideal (normalizationCommAlgCat A Ω).carrier) [Q.IsMaximal]
theorem normalizationSeparableRootsRestrictionHomeomorph_scalar
    (T : Set (InvertibleExponent (IsLocalRing.ResidueField A)))
    (hT : ∀ n : InvertibleExponent (IsLocalRing.ResidueField A),
      ∃ t : T, n ≤ t.val) (t : T)
    (x : (normalizationSeparableRootsGroup A Ω Q).carrier) :
    nativeRestrictedRootsScalar (IsLocalRing.ResidueField A)
      (normalizationResidueFieldObject A Ω Q) T t
        ((normalizationSeparableRootsRestrictionHomeomorph A Ω Q T hT).toFun x) =
      normalizationSeparableRootsScalar A Ω Q t.val x