Coordinate-local mixed sections preserving isolated point counts
OpenPhilipponMultiplicity.exists_coordinate_local_mixed_section_preserving_isolated_pointsLet be a Philippon base field, , and a closed irreducible variety. Fix with . Let have dimension , and let be a finite subset of the section . Assume that each has a Zariski-open neighborhood with .
There are subspaces of the same dimensions such that is finite, together with an injection of sets . There are also an ordered list of blocks , block-linear forms , and actual cut ideals such that
On , the equations for define exactly .
For every choice of one coordinate in each block, put and . At each step , multiplication by is injective on . The final quotient is reduced. These conditions hold on every member of this finite coordinate cover of the relevant multicone.
The special section may have positive-dimensional components away from . The injection need not be a geometric morphism and does not assert that the original points lie in . Empty sections, empty cutting lists, and zero localized quotients are allowed.
Formalization Note. This is an auxiliary synthesis of isolated-point persistence, general reduced sections, and generic filter regularity. Constructing the section, injection, and flag simultaneously in the stated coordinates remains Open. The principal localizations are rings of opens of the multicone, not degree-zero dehomogenized charts. No eventual homogeneous ideal equality, Hilbert function assertion, mixed coefficient, numerical degree bound, or primary-prime avoidance is assumed.
Verified reduction to geometric points. The accepted sketch applies the checked Jacobson-ring membership criterion on principal opens to propagate injectivity and radicality from maximal localizations. The weak Nullstellensatz identifies the required maximal ideals with evaluation ideals of vectors whose blocks are nonzero. Points outside a cut have the unit localized ideal, so conditions are needed only on its actual geometric points. The reduction preserves the same injection of the prescribed isolated point set into the new finite section.
The sole Open dependency is point-local sections preserving isolated points. It supplies the same section, injection, and flag, with injectivity at geometric points of each successive cut and reducedness at geometric points of the final cut. No property of an entire coordinate localization is assumed there. Simultaneous geometric choice and isolated-point persistence remain Open; the passage from the point-local conditions to the displayed coordinate-open conditions is proved.
import Mathlib.RingTheory.Localization.Ideal import Definitions.Def_PhilipponMultiplicity_GeometricSupport set_option autoImplicit false open scoped BigOperators Topology
namespace PhilipponMultiplicity
open SectionThree
theorem exists_coordinate_local_mixed_section_preserving_isolated_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 : ∀ i : M.FactorIndex, Submodule K (Fin (M.ambientDimension i + 1) → K),
(∀ i, Module.finrank K (L i) + α i = M.ambientDimension i + 1) →
∀ S : Set M.Point, S.Finite → S ⊆ linearSlice M W L →
(∀ x ∈ S, ∃ U : Set M.Point, @IsOpen _ M.zariskiTopology U ∧ x ∈ U ∧
U ∩ linearSlice M W L ⊆ S) →
∃ L' : ∀ i : M.FactorIndex, Submodule K (Fin (M.ambientDimension i + 1) → K),
(∀ i, Module.finrank K (L' i) + α i = M.ambientDimension i + 1) ∧
(linearSlice M W L').Finite ∧
Nonempty (S ↪ linearSlice M W L') ∧
∃ (l : List M.FactorIndex) (P : ℕ → M.CoordinateRing)
(J : ℕ → Ideal M.CoordinateRing),
(∀ i, l.count i = α i) ∧ J 0 = M.vanishingIdeal W ∧
(∀ k (hk : k < l.length),
M.IsHomogeneous (P k) (Pi.single l[k] 1) ∧
J (k+1) = J k ⊔ Ideal.span {P k} ∧
∀ j : ∀ i : M.FactorIndex, Fin (M.ambientDimension i + 1),
let f := algebraMap M.CoordinateRing
(Localization.Away (∏ i,
(MvPolynomial.X (⟨i,j i⟩ : M.Variable) : M.CoordinateRing)))
∀ Q, f (P k) * Q ∈ (J k).map f → Q ∈ (J k).map f) ∧
(∀ x : M.Point, x ∈ linearSlice M W L' ↔
x ∈ W ∧ ∀ k < l.length, M.eval (P k) x = 0) ∧
(∀ j : ∀ i : M.FactorIndex, Fin (M.ambientDimension i + 1),
((J l.length).map (algebraMap M.CoordinateRing
(Localization.Away (∏ i,
(MvPolynomial.X (⟨i,j i⟩ : M.Variable) : M.CoordinateRing))))).IsRadical) := by sorry
end PhilipponMultiplicity