Module

HasPrincipalDivisors_adjoin_of_transcendental.lean

Nyll.AlgebraicCurves.Divisors.HasPrincipalDivisors_adjoin_of_transcendental
2 declarations indexed from sourceView source ↗

Has Principal Divisors adjoin of transcendental

Declarations

AlgebraicCurves.Divisors.Proofs.HasPrincipalDivisors_adjoin_of_transcendental.AlgebraicCurve.W2.hasPrincipalDivisors_adjoin
Source context 8 commands

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

section ProofImplementation
namespace AlgebraicCurves.Divisors.Proofs.HasPrincipalDivisors_adjoin_of_transcendental
noncomputable section
open IntermediateField
namespace AlgebraicCurve
open _root_.AlgebraicCurve
namespace W2
variable (K : Type*) [Field K] [CharZero K] {LF : Type*} [Field LF] [Algebra K LF]
theorem hasPrincipalDivisors_adjoin (x : LF) (hx : Transcendental K x) (T : Finset LF)
    (hT : ∀ t ∈ T, IsIntegral (IntermediateField.adjoin K ({x} : Set LF)) t) :
    HasPrincipalDivisors K (IntermediateField.adjoin K (insert x (T : Set LF)))
AlgebraicCurve.hasPrincipalDivisors_adjoin_of_transcendental
Source context 5 commands

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

section ProofImplementation
namespace AlgebraicCurves.Divisors.Proofs.HasPrincipalDivisors_adjoin_of_transcendental
noncomputable section
open IntermediateField
open _root_.AlgebraicCurve
theorem _root_.AlgebraicCurve.hasPrincipalDivisors_adjoin_of_transcendental (K : Type*) [Field K]
  [CharZero K] {LF : Type*} [Field LF] [Algebra K LF]
    (x : LF) (hx : Transcendental K x) (T : Finset LF)
    (hT : ∀ t ∈ T, IsIntegral (IntermediateField.adjoin K ({x} : Set LF)) t) :
    HasPrincipalDivisors K (IntermediateField.adjoin K (insert x (T : Set LF)))