Corollary E(a): if a polynomial in u and ū has an exponent of absolute value at least four, its hull carries a 2×3 configuration exactly in the real pencil class
ProvedDiazModulus.laurent_conj_hull_large_exponent_configuration_iff_real_pencil_classLet and with (so is real), and put , so that . Let , let for all , and put and . Suppose for some with . Then carries a configuration (free and free over with all six products in the space) if and only if is in the class
- (R) with , for some with and some with and .
Proof. If: class (R) gives (DiazModulus.laurent_conj_hull_class_finrank_eq_five), and Theorem E (DiazModulus.laurent_conj_hull_two_by_three_configuration_iff) gives the configuration. Only if: Theorem E gives and one of the classes (P), (Q), (R). In (Q), lies in the window . In (P), is itself a Laurent polynomial in of class (P), so its hull, contained in , is five-dimensional by DiazModulus.laurent_conj_hull_class_finrank_eq_five, hence equal to , and again lies in the window. Clearing by and comparing the coefficients of then gives for , a contradiction.
Novelty. Not found in the sources read; routine, given Theorem E (DiazModulus.laurent_conj_hull_two_by_three_configuration_iff).
import Definitions.Def_DiazModulus
open Complex ComplexConjugate
namespace DiazModulus
theorem laurent_conj_hull_large_exponent_configuration_iff_real_pencil_class
(u s : ℂ) (hu : u ∉ Qbar) (hs : s ∈ Qbar) (hss : s * s = u * conj u)
(k : ℕ) (c : ℤ → ℂ) (hc : ∀ j, c j ∈ Qbar)
(hbig : ∃ j ∈ Finset.Icc (-(k : ℤ)) k, 4 ≤ |j| ∧ c j ≠ 0) :
(∃ (x : Fin 2 → ℂ) (y : Fin 3 → ℂ), LinearIndependent (↥Qbar) x ∧ LinearIndependent (↥Qbar) y ∧
∀ i j, x i * y j ∈ Submodule.span Qbar ({1, u, conj u, (∑ j ∈ Finset.Icc (-(k : ℤ)) k, c j * (u / s) ^ j), conj (∑ j ∈ Finset.Icc (-(k : ℤ)) k, c j * (u / s) ^ j)} : Set ℂ)) ↔
(∃ κ : ℂ, κ ∈ Qbar ∧ κ * conj κ = 1 ∧ ∃ G : Polynomial ↥Qbar, G.coeff 0 = 0 ∧ 2 ≤ G.natDegree ∧
Submodule.span Qbar ({1, u, conj u, (∑ j ∈ Finset.Icc (-(k : ℤ)) k, c j * (u / s) ^ j), conj (∑ j ∈ Finset.Icc (-(k : ℤ)) k, c j * (u / s) ^ j)} : Set ℂ) =
Submodule.span Qbar ({1, u, conj u, Polynomial.aeval (u / s) G + κ * conj ((u / s) * Polynomial.aeval (u / s) G), conj (Polynomial.aeval (u / s) G + κ * conj ((u / s) * Polynomial.aeval (u / s) G))} : Set ℂ)) := by
sorry
end DiazModulus