Degree bound on : if and is regular at , then
ProvedCurveSymmetry.quarticTerm_natDegree_leLet be the function field of the quartic , written as the Kummer cover ; here is the class of , so that in . For the chart at infinity , , let , with the class of , so that , and let be the ring homomorphism with for and . Fix with , so that is a point of , and let be its local ring: the localization of at the kernel of the evaluation , , viewed inside . Put , a valuation ring of (a place of over ).
Let be the -module of Kähler differentials of over , with universal derivation . A differential is regular at a valuation ring of if it is a -linear combination of differentials with .
Let be a nonzero polynomial and an integer. If the differential is regular at , then
Applied to the four holomorphic pieces of a holomorphic differential, it leaves , constant and ; this yields the spanning set , , of the holomorphic differentials and the genus three of the quartic used in Remark 5 of the note.
Formalization Note: is one fourth root of , selected by choice, and the statement concerns that root. is defined as the preimage of the place of at under the -algebra isomorphism whose underlying map is .
import Definitions.Def_CurveSymmetry_01_RealLoci import Definitions.Def_CurveSymmetry_02_FamilyBasics import Definitions.Def_CurveSymmetry_03_IsometriesAndCharts import Definitions.Def_CurveSymmetry_05_FamilyFunctionField import Definitions.Def_CurveSymmetry_06_QuadraticRing import Definitions.Def_CurveSymmetry_07_Places import Definitions.Def_CurveSymmetry_08_Differentials import Definitions.Def_CurveSymmetry_09_Genus import Definitions.Def_CurveSymmetry_10_KummerField import Definitions.Def_CurveSymmetry_11_KummerLocal import Definitions.Def_CurveSymmetry_12_FermatGenus import Mathlib.Algebra.MvPolynomial.Nilpotent import Mathlib.Algebra.MvPolynomial.NoZeroDivisors import Mathlib.Algebra.MvPolynomial.PDeriv import Mathlib.Algebra.Polynomial.FieldDivision import Mathlib.Algebra.Polynomial.Reverse import Mathlib.Algebra.Polynomial.SpecificDegree import Mathlib.Analysis.Complex.Isometry import Mathlib.Analysis.Complex.OperatorNorm import Mathlib.Analysis.Complex.Polynomial.Basic import Mathlib.Analysis.Normed.Affine.MazurUlam import Mathlib.Data.Complex.Basic import Mathlib.FieldTheory.RatFunc.Basic import Mathlib.FieldTheory.Separable import Mathlib.LinearAlgebra.Basis.Basic import Mathlib.LinearAlgebra.Dimension.Finrank import Mathlib.LinearAlgebra.FiniteDimensional.Defs import Mathlib.LinearAlgebra.TensorProduct.Basis import Mathlib.RingTheory.AdjoinRoot import Mathlib.RingTheory.DedekindDomain.Dvr import Mathlib.RingTheory.DiscreteValuationRing.TFAE import Mathlib.RingTheory.Etale.Field import Mathlib.RingTheory.Etale.Kaehler import Mathlib.RingTheory.Kaehler.Basic import Mathlib.RingTheory.Kaehler.Polynomial import Mathlib.RingTheory.LocalRing.MaximalIdeal.Basic import Mathlib.RingTheory.LocalRing.Module import Mathlib.RingTheory.Localization.AsSubring import Mathlib.RingTheory.MvPolynomial.Homogeneous import Mathlib.RingTheory.MvPolynomial.IrreducibleQuadratic import Mathlib.RingTheory.Nakayama import Mathlib.RingTheory.Polynomial.Eisenstein.Criterion import Mathlib.RingTheory.Polynomial.GaussLemma import Mathlib.RingTheory.RootsOfUnity.Complex import Mathlib.RingTheory.RootsOfUnity.PrimitiveRoots import Mathlib.RingTheory.Spectrum.Maximal.Localization import Mathlib.RingTheory.Valuation.ValuationSubring import Mathlib.Tactic open CurveSymmetry set_option autoImplicit false open Polynomial
theorem CurveSymmetry.quarticTerm_natDegree_le {p : ℂ[X]} (hp : p ≠ 0) {j : ℕ}
(h : quarticTerm p j • KaehlerDifferential.D ℂ (KummerField 4 fermatQuartic) quarticX ∈ regularAt fermatInfinityPlace) :
p.natDegree + j ≤ 1 := by sorry