Choosing algebraic cyclic jets modulo polynomial functional relations
ProvedArithmeticE.cyclic_jet_testLet be complex formal power series satisfying , with and rational polynomial data. Assume a polynomial relation basis with polynomial left inverse is supplied. Let satisfy , and let not be the specialization at of a polynomial relation among the .
There are and algebraic rows , with , such that every complex polynomial row satisfying
gives a polynomial derivative frame of order for at . Here is the cleared derivative-row recurrence. A frame means polynomially independent series , a common multiplier , and polynomial coordinates for , with .
This separates choosing a basis in the specialized polynomial span from realizing the chosen jets. It does not assert the existence of or of a minimal scalar equation. Algebraicity of and of the coefficients of is not required in this lemma.
import Definitions.Def_clearedDerivativeRows import Definitions.Def_polynomialDerivativeFrame open ArithmeticE
theorem ArithmeticE.cyclic_jet_test
(m : ℕ) (f : Fin m → PowerSeries ℂ)
(T : Polynomial ℚ) (B : Matrix (Fin m) (Fin m) (Polynomial ℚ))
(hode : ∀ i, (T.map (algebraMap ℚ ℂ) : PowerSeries ℂ) * PowerSeries.derivative ℂ (f i) =
∑ j, ((B i j).map (algebraMap ℚ ℂ) : PowerSeries ℂ) * f j)
(hbasis : RelationBasis f)
(ξ : ℂ) (hreg : T.eval₂ (algebraMap ℚ ℂ) ξ ≠ 0)
(a : Fin m → ℂ) (ha : ∀ i, IsAlgebraic ℚ (a i))
(hnot : ¬ ∃ p : Fin m → Polynomial ℂ,
(∑ i, (p i : PowerSeries ℂ) * f i = 0) ∧ ∀ i, (p i).eval ξ = a i) :
∃ (n : ℕ) (w : ℕ → Fin m → ℂ),
0 < n ∧
(∀ k < n, ∀ i, IsAlgebraic ℚ (w k i)) ∧
(∀ i, w 0 i = a i) ∧
∀ P : Fin m → Polynomial ℂ,
(∀ k < n, ∀ i, (clearedDerivativeRows T B P k i).eval ξ = w k i) →
PolynomialDerivativeFrame (∑ i, (P i : PowerSeries ℂ) * f i) ξ n := by sorry