Isolated points of mixed equations persist on an open coefficient neighborhood
OpenPhilipponMultiplicity.exists_open_preserving_isolated_equation_pointsLet be a Philippon base field, let be the given finite multiprojective space, and let be closed and irreducible. Fix with , and an ordered list containing each block exactly times.
For an array of coefficients , write
Choose initial coefficients and a finite subset . Suppose each has a Zariski-open neighborhood such that .
Let be the polynomial ring on all coefficient entries, and let be the kernel of evaluation at . There is a Zariski-open subset such that
Thus the number of prescribed isolated points persists throughout an open neighborhood of the initial coefficient array. Positive-dimensional components away from those points are allowed. The injection need not retain the original points. Empty and empty equation lists are included.
Formalization Note. This auxiliary incidence-family statement is not a verbatim numbered theorem of the cited sources. It involves only equation coefficients and an open subset of their affine spectrum. The initial rows need not be independent; no subspaces, codimension witnesses, or principal-open polynomial are part of the conclusion. The formal isolation hypothesis permits one neighborhood to contain several points of . No smoothness or finiteness of the entire section is asserted.
import Mathlib import Definitions.Def_PhilipponMultiplicity_GeometricSupport import Definitions.Def_PhilipponMultiplicity_MixedFlagParameters set_option autoImplicit false open scoped BigOperators Topology
namespace PhilipponMultiplicity
open SectionThree SectionThreeSupport
theorem exists_open_preserving_isolated_equation_points
(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) →
∀ l : List M.FactorIndex, (∀ i, l.count i = α i) →
∀ c₀ : Fin l.length → M.Variable → K,
∀ S : Set M.Point, S.Finite →
S ⊆ {x : M.Point | x ∈ W ∧
∀ j : Fin l.length, M.eval (MixedFlag.polynomial M l c₀ j) x = 0} →
(∀ x ∈ S, ∃ V : Set M.Point, @IsOpen _ M.zariskiTopology V ∧ x ∈ V ∧
V ∩ {x : M.Point | x ∈ W ∧
∀ j : Fin l.length, M.eval (MixedFlag.polynomial M l c₀ j) x = 0} ⊆ S) →
∃ U : Set (PrimeSpectrum (MvPolynomial (Fin l.length × M.Variable) K)),
IsOpen U ∧
(⟨MvPolynomial.vanishingIdeal K {Function.uncurry c₀}, inferInstance⟩ :
PrimeSpectrum (MvPolynomial (Fin l.length × M.Variable) K)) ∈ U ∧
∀ c : Fin l.length → M.Variable → K,
(⟨MvPolynomial.vanishingIdeal K {Function.uncurry c}, inferInstance⟩ :
PrimeSpectrum (MvPolynomial (Fin l.length × M.Variable) K)) ∈ U →
Nonempty (S ↪ {x : M.Point | x ∈ W ∧
∀ j : Fin l.length, M.eval (MixedFlag.polynomial M l c j) x = 0}) := by sorry
end PhilipponMultiplicity