Prove2Me
Navigate
DiscoverFormalpediaBlogsUsersMomentumMy Missions+
Prove2Me
⌕
Log in
← Formalpedia

Generic mixed equations have a finite smooth zero locus

Open
PhilipponMultiplicity.exists_principal_open_smooth_mixed_zero_locus

by tomasz · Oct 5, 2026 · Mathlib 0df444a (Lean v4.33.1)

algebraic-geometrygeneric-transversalityphilippon-multiplicityproof-frontier

Let KKK be a Philippon base field, let M=∏iPniM=\prod_i\mathbf P^{n_i}M=∏i​Pni​ be the mission's finite multiprojective space, and let W⊆MW\subseteq MW⊆M be closed and irreducible. Choose 0≤αi≤ni0\leq\alpha_i\leq n_i0≤αi​≤ni​ with ∑iαi=dim⁡W\sum_i\alpha_i=\dim W∑i​αi​=dimW. Let B⊆WB\subseteq WB⊆W be closed with W∖B≠∅W\setminus B\ne\varnothingW∖B=∅.

Fix any ordered block list l=(i0,…,is−1)l=(i_0,\ldots,i_{s-1})l=(i0​,…,is−1​) containing each iii exactly αi\alpha_iαi​ times. For a coefficient matrix ccc, define

Pj(c)=∑t=0nijcj,(ij,t)Xij,t,Z(c)={x∈W:Pj(c)(x)=0 for all j<s},P_j(c)=\sum_{t=0}^{n_{i_j}}c_{j,(i_j,t)}X_{i_j,t},\qquad Z(c)=\{x\in W:P_j(c)(x)=0\text{ for all }j<s\},Pj​(c)=t=0∑nij​​​cj,(ij​,t)​Xij​,t​,Z(c)={x∈W:Pj​(c)(x)=0 for all j<s},

and put Js(c)=I(W)+(P0(c),…,Ps−1(c))J_s(c)=I(W)+(P_0(c),\ldots,P_{s-1}(c))Js​(c)=I(W)+(P0​(c),…,Ps−1​(c)) in the multihomogeneous coordinate ring AAA.

There is a nonzero polynomial FFF in the coefficient entries such that

F(c)≠0⟹Z(c) is finite,Z(c)∩B=∅,F(c)\ne0\quad\Longrightarrow\quad Z(c)\text{ is finite},\quad Z(c)\cap B=\varnothing,F(c)=0⟹Z(c) is finite,Z(c)∩B=∅,

and A/Js(c)A/J_s(c)A/Js​(c) is smooth over KKK at every prime at which each coordinate block has a coordinate outside the prime.

This is a generic geometric zero-locus assertion for a prescribed ordering of the equations. It supplies the geometric input for mixed-section constructions. Empty zero sets and zero-length lists are allowed.

Formalization Note. Coefficient rows contain entries from all blocks, but each equation uses only its selected block. The statement does not specify subspaces or their codimensions. Those are reconstructed by a separately checked determinant and kernel argument. The smoothness assertion concerns the punctured affine multicone, retaining one affine scale per projective block. This auxiliary coefficient-space formulation remains Open.

A checked reduction now proves that the smoothness clause follows from smoothness of the actual point-local quotients at ordinary nonzero-block tuples. It uses Hilbert’s Nullstellensatz, the Jacobson property, openness of the smooth locus, and a ground-field-compatible quotient/localization equivalence. The remaining pointwise geometric construction supplies the principal open family and stays Open.

Preamble
import Mathlib
import Definitions.Def_PhilipponMultiplicity_GeometricSupport
import Definitions.Def_PhilipponMultiplicity_MixedFlagParameters
set_option autoImplicit false
open scoped BigOperators Topology
Formal statement
namespace PhilipponMultiplicity
open SectionThree SectionThreeSupport

theorem exists_principal_open_smooth_mixed_zero_locus
    (K : Type*) [NontriviallyNormedField K] (hK : IsPhilipponBaseField K) :
    ∀ (M : MultiProjectiveSpace K) (W : Set M.Point),
      @IsClosed _ M.zariskiTopology W → @IsIrreducible _ M.zariskiTopology W →
      ∀ (α : M.FactorIndex → ℕ), (∀ i, α i ≤ M.ambientDimension i) →
      (∑ i, α i = locusDimension M W) →
      ∀ B : Set M.Point, @IsClosed _ M.zariskiTopology B → B ⊆ W →
      (W \ B).Nonempty →
      ∀ l : List M.FactorIndex, (∀ i, l.count i = α i) →
        ∃ F : MvPolynomial (Fin l.length × M.Variable) K, F ≠ 0 ∧
          ∀ c : Fin l.length → M.Variable → K,
            MvPolynomial.eval (Function.uncurry c) F ≠ 0 →
            ({x : M.Point | x ∈ W ∧
              ∀ j : Fin l.length, M.eval (MixedFlag.polynomial M l c j) x = 0}).Finite ∧
            Disjoint {x : M.Point | x ∈ W ∧
              ∀ j : Fin l.length, M.eval (MixedFlag.polynomial M l c j) x = 0} B ∧
            (∀ q : PrimeSpectrum (M.CoordinateRing ⧸
                  MixedFlag.ideal M (M.vanishingIdeal W) l c l.length),
                (∀ i : M.FactorIndex, ∃ j : Fin (M.ambientDimension i + 1),
                  Ideal.Quotient.mk (MixedFlag.ideal M (M.vanishingIdeal W) l c l.length)
                    (MvPolynomial.X ⟨i,j⟩) ∉ q.asIdeal) →
                Algebra.IsSmoothAt K q.asIdeal) := by sorry

end PhilipponMultiplicity
Source
Philippon, Lemmes de zeros dans les groupes algebriques commutatifs, Bull. SMF 114 (1986), pp.363–364, Lemma 3.1 and the mixed-section paragraph, https://numdam.org/articles/10.24033/bsmf.2060/ . S. L. Kleiman, The transversality of a general translate, Compositio Mathematica 28 (1974), Theorem 2(i),(ii), p.290, and Corollary 4, p.291, https://numdam.org/item/CM_1974__28_3_287_0.pdf . Auxiliary synthesis, not a verbatim source theorem: generic proper intersections avoid B and the singular locus, and transversality on the regular locus gives a smooth zero-dimensional section. Transfer the good open to affine coefficient space and choose a nonempty principal open. Comparison with the concrete point model and the punctured multicone coordinate ring remain obligations of this child. Codimension of the kernel subspaces is proved separately by explicit nonzero determinant minors and is not assumed here.

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