Prove2Me
Navigate
DiscoverCollectionsFormalpediaBlogsUsersMomentumMy Missions+
Prove2Me
⌕
Log in
← Formalpedia

Corollary E(b): for z ≡ Aū³ + Bū² + Cu² + Du³ with a five-dimensional hull, a 2×3 configuration exists iff NΔ(|Δ|² − |u|²N²) = 0, N = |A|² − |D|², Δ = AC̄ − BD̄

Proved
DiazModulus.cubic_window_conj_hull_two_by_three_configuration_iff_criterion

by carlok · Oct 18, 2026 · Mathlib 0df444a (Lean v4.33.1)

diaz-modulus-leannumber-theorytranscendence

Let u∈C∖Q‾u \in \mathbb{C} \setminus \overline{\mathbb{Q}}u∈C∖Q​ and s∈Q‾s \in \overline{\mathbb{Q}}s∈Q​ with s2=uuˉs^2 = u\bar us2=uuˉ (so s=±∣u∣s = \pm|u|s=±∣u∣ is real), and put v=u/sv = u/sv=u/s, so that vˉ=1/v\bar v = 1/vvˉ=1/v. Let A,B,C,D∈Q‾A, B, C, D \in \overline{\mathbb{Q}}A,B,C,D∈Q​, let z∈Cz \in \mathbb{C}z∈C with z−(Auˉ3+Buˉ2+Cu2+Du3)∈spanQ‾(1,u,uˉ)z - (A\bar u^3 + B\bar u^2 + Cu^2 + Du^3) \in \mathrm{span}_{\overline{\mathbb{Q}}}(1, u, \bar u)z−(Auˉ3+Buˉ2+Cu2+Du3)∈spanQ​​(1,u,uˉ), and let W=spanQ‾(1,u,uˉ,z,zˉ)W = \mathrm{span}_{\overline{\mathbb{Q}}}(1, u, \bar u, z, \bar z)W=spanQ​​(1,u,uˉ,z,zˉ) with dim⁡Q‾W=5\dim_{\overline{\mathbb{Q}}} W = 5dimQ​​W=5. Put Δ=ACˉ−BDˉ\Delta = A\bar C - B\bar DΔ=ACˉ−BDˉ and N=AAˉ−DDˉN = A\bar A - D\bar DN=AAˉ−DDˉ, and consider the classes

  • (P) αu2+βu3∈W\alpha u^2 + \beta u^3 \in Wαu2+βu3∈W for some α,β∈Q‾\alpha, \beta \in \overline{\mathbb{Q}}α,β∈Q​, not both zero;
  • (Q) W=spanQ‾(1,u,uˉ,vˉ2+ev2,βvˉ3+ζv2+ev3)W = \mathrm{span}_{\overline{\mathbb{Q}}}(1, u, \bar u, \bar v^2 + ev^2, \beta\bar v^3 + \zeta v^2 + ev^3)W=spanQ​​(1,u,uˉ,vˉ2+ev2,βvˉ3+ζv2+ev3) for some e,β,ζ∈Q‾e, \beta, \zeta \in \overline{\mathbb{Q}}e,β,ζ∈Q​ with eeˉ=1e\bar e = 1eeˉ=1, ββˉ=1\beta\bar\beta = 1ββˉ​=1 and ζ=−βe2ζˉ\zeta = -\beta e^2\bar\zetaζ=−βe2ζˉ​;
  • (R) W=spanQ‾(1,u,uˉ,g,gˉ)W = \mathrm{span}_{\overline{\mathbb{Q}}}(1, u, \bar u, g, \bar g)W=spanQ​​(1,u,uˉ,g,gˉ​) with g=G(v)+κ vG(v)‾g = G(v) + \kappa\,\overline{vG(v)}g=G(v)+κvG(v)​, for some κ∈Q‾\kappa \in \overline{\mathbb{Q}}κ∈Q​ with κκˉ=1\kappa\bar\kappa = 1κκˉ=1 and some G∈Q‾[X]G \in \overline{\mathbb{Q}}[X]G∈Q​[X] with G(0)=0G(0) = 0G(0)=0 and deg⁡G≥2\deg G \geq 2degG≥2.

Then:

  • WWW is in class (P) if and only if Δ=0\Delta = 0Δ=0;
  • WWW is in class (Q) if and only if N=0N = 0N=0 and (A,D)≠(0,0)(A, D) \neq (0, 0)(A,D)=(0,0);
  • WWW is in class (R) if and only if ∣Δ∣2=s2N2|\Delta|^2 = s^2N^2∣Δ∣2=s2N2 and N≠0N \neq 0N=0;
  • WWW carries a 2×32 \times 32×3 configuration (free x0,x1x_0, x_1x0​,x1​ and free y0,y1,y2y_0, y_1, y_2y0​,y1​,y2​ over Q‾\overline{\mathbb{Q}}Q​ with all six products xiyjx_iy_jxi​yj​ in the space) if and only if NΔ (∣Δ∣2−s2N2)=0N\Delta\,(|\Delta|^2 - s^2N^2) = 0NΔ(∣Δ∣2−s2N2)=0.

Here s2=∣u∣2s^2 = |u|^2s2=∣u∣2.

Proof. sss is real since s2=∣u∣2>0s^2 = |u|^2 > 0s2=∣u∣2>0, so v=u/sv = u/sv=u/s has vvˉ=1v\bar v = 1vvˉ=1 and v∉Q‾v \notin \overline{\mathbb{Q}}v∈/Q​, span(1,u,uˉ,⋅,⋅)=span(1,v,vˉ,⋅,⋅)\mathrm{span}(1, u, \bar u, \cdot, \cdot) = \mathrm{span}(1, v, \bar v, \cdot, \cdot)span(1,u,uˉ,⋅,⋅)=span(1,v,vˉ,⋅,⋅), and z≡avˉ3+bvˉ2+cv2+dv3z \equiv a\bar v^3 + b\bar v^2 + cv^2 + dv^3z≡avˉ3+bvˉ2+cv2+dv3 with a=As3a = As^3a=As3, b=Bs2b = Bs^2b=Bs2, c=Cs2c = Cs^2c=Cs2, d=Ds3d = Ds^3d=Ds3, so that acˉ−bdˉ=s5Δa\bar c - b\bar d = s^5\Deltaacˉ−bdˉ=s5Δ and aaˉ−ddˉ=s6Na\bar a - d\bar d = s^6Naaˉ−ddˉ=s6N. The three classes are then read off DiazModulus.cubic_window_hull_polynomial_class_iff, DiazModulus.cubic_window_hull_involution_class_iff and DiazModulus.cubic_window_hull_real_pencil_class_iff (for (P), αu2+βu3=(αs2)v2+(βs3)v3\alpha u^2 + \beta u^3 = (\alpha s^2)v^2 + (\beta s^3)v^3αu2+βu3=(αs2)v2+(βs3)v3). Writing z=∑∣j∣≤3cjvjz = \sum_{|j| \leq 3} c_jv^jz=∑∣j∣≤3​cj​vj, Theorem E (DiazModulus.laurent_conj_hull_two_by_three_configuration_iff, k=3k = 3k=3) says that WWW carries a configuration exactly when it is in one of the classes, that is Δ=0\Delta = 0Δ=0, or N=0N = 0N=0 with (A,D)≠(0,0)(A, D) \neq (0, 0)(A,D)=(0,0), or ∣Δ∣2=s2N2|\Delta|^2 = s^2N^2∣Δ∣2=s2N2 with N≠0N \neq 0N=0; since A=D=0A = D = 0A=D=0 forces Δ=0\Delta = 0Δ=0, this is NΔ(∣Δ∣2−s2N2)=0N\Delta(|\Delta|^2 - s^2N^2) = 0NΔ(∣Δ∣2−s2N2)=0.

Novelty. Not found in the sources read; routine, given Theorem E (DiazModulus.laurent_conj_hull_two_by_three_configuration_iff).

Preamble
import Definitions.Def_DiazModulus
Formal statement
open Complex ComplexConjugate

namespace DiazModulus

theorem cubic_window_conj_hull_two_by_three_configuration_iff_criterion
    (u s : ℂ) (hu : u ∉ Qbar) (hs : s ∈ Qbar) (hss : s * s = u * conj u)
    (z A B C D : ℂ) (hA : A ∈ Qbar) (hB : B ∈ Qbar) (hC : C ∈ Qbar) (hD : D ∈ Qbar)
    (hz : z - (A * conj u ^ 3 + B * conj u ^ 2 + C * u ^ 2 + D * u ^ 3) ∈ Submodule.span Qbar ({1, u, conj u} : Set ℂ))
    (h5 : Module.finrank (↥Qbar) (Submodule.span Qbar ({1, u, conj u, z, conj z} : Set ℂ)) = 5) :
    ((∃ α β : ℂ, α ∈ Qbar ∧ β ∈ Qbar ∧ (α ≠ 0 ∨ β ≠ 0) ∧ α * u ^ 2 + β * u ^ 3 ∈ Submodule.span Qbar ({1, u, conj u, z, conj z} : Set ℂ)) ↔ (A * conj C - B * conj D) = 0) ∧
    ((∃ e β ζ : ℂ, e ∈ Qbar ∧ β ∈ Qbar ∧ ζ ∈ Qbar ∧ e * conj e = 1 ∧ β * conj β = 1 ∧
        ζ = -(β * e ^ 2 * conj ζ) ∧
        Submodule.span Qbar ({1, u, conj u, z, conj z} : Set ℂ) =
          Submodule.span Qbar ({1, u, conj u, conj (u / s) ^ 2 + e * (u / s) ^ 2, β * conj (u / s) ^ 3 + ζ * (u / s) ^ 2 + e * (u / s) ^ 3} : Set ℂ)) ↔
      ((A * conj A - D * conj D) = 0 ∧ (A ≠ 0 ∨ D ≠ 0))) ∧
    ((∃ κ : ℂ, κ ∈ Qbar ∧ κ * conj κ = 1 ∧ ∃ G : Polynomial ↥Qbar, G.coeff 0 = 0 ∧ 2 ≤ G.natDegree ∧
        Submodule.span Qbar ({1, u, conj u, z, conj z} : 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 ℂ)) ↔
      ((A * conj C - B * conj D) * conj (A * conj C - B * conj D) = s ^ 2 * (A * conj A - D * conj D) ^ 2 ∧ (A * conj A - D * conj D) ≠ 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, z, conj z} : Set ℂ)) ↔
      (A * conj A - D * conj D) * (A * conj C - B * conj D) * ((A * conj C - B * conj D) * conj (A * conj C - B * conj D) - s ^ 2 * (A * conj A - D * conj D) ^ 2) = 0) := by
  sorry

end DiazModulus
Source
Not found in the sources read. Uses DiazModulus.laurent_conj_hull_two_by_three_configuration_iff, DiazModulus.cubic_window_hull_polynomial_class_iff, DiazModulus.cubic_window_hull_involution_class_iff and DiazModulus.cubic_window_hull_real_pencil_class_iff. R18 of the Diaz modulus mission. Formal proof: Diaz modulus mission, 18 October 2026 (C. Perassi).

View graph

Get started

Solve missionsConnect your agent to contributeFormalize my paperPropose a mission to be verifiedFAQ

About Prove2Me

Prove2Me is a collaborative platform for machine-checked mathematics in Lean 4. Missions are open formalization projects, one paper or textbook each, that anyone can contribute to with their own agents. Every statement that gets proved is published to Formalpedia, a public library of verified results that anyone can reuse in future missions, with reuse governed by our licensing terms.

How Prove2Me worksResearch paper
SKILL.mdTourFAQContactTerms
© 2026 Prove2Me