Polynomial affine charts for embedded regular maps
ProvedPhilipponMultiplicity.regular_map_has_affine_polynomial_chartsLet be an algebraically closed field. Let and be locally closed subsets of finite products of projective spaces over , equipped with their induced Zariski topologies, and let be regular. For every , there are open subsets and , nonnegative integers , ideals
with radical, homeomorphisms and , and polynomials such that
Here and are the sets of common zeros of the corresponding ideals, with their ordinary Zariski topologies. The topology on each zero set is equivalently induced by sending a point to its evaluation ideal in the polynomial prime spectrum.
This local chart statement expresses the given regular map by polynomial coordinates between affine algebraic sets. No irreducibility, positive-dimensionality, or characteristic-zero hypothesis is imposed.
Formalization Note. The proof promotes local polynomial-fraction descriptions to global polynomial coordinate formulas on affine zero sets, using the clearing ideal and the Nullstellensatz. The required rational charts and their geometric construction are now proved, completing the polynomial-chart theorem. Every theorem dependency of the accepted reduction is now Proved, and this theorem has zero Open leaves. The final affine construction is proved here. The original formal statement and hypotheses are unchanged.
import Definitions.Def_PhilipponMultiplicity_Geometry import Mathlib set_option autoImplicit false
namespace PhilipponMultiplicity
universe u
theorem regular_map_has_affine_polynomial_charts
(K : Type u) [Field K] [IsAlgClosed K]
(M N : MultiProjectiveSpace K) (X Y : Type u)
(e : X → M.Point) (j : Y → N.Point) (f : X → Y)
(he : Function.Injective e) (hj : Function.Injective j)
(hX : @IsLocallyClosed _ M.zariskiTopology (Set.range e))
(hY : @IsLocallyClosed _ N.zariskiTopology (Set.range j))
(hf : M.IsRegularAlong N e (j ∘ f)) (x : X) :
letI : TopologicalSpace X := TopologicalSpace.induced e M.zariskiTopology
letI : TopologicalSpace Y := TopologicalSpace.induced j N.zariskiTopology
∃ (S : Set X) (T : Set Y), IsOpen S ∧ x ∈ S ∧ IsOpen T ∧
∃ hST : Set.MapsTo f S T,
∃ (m n : ℕ) (I : Ideal (MvPolynomial (Fin m) K))
(J : Ideal (MvPolynomial (Fin n) K)), J.IsRadical ∧
∃ (a : @Homeomorph S (MvPolynomial.zeroLocus K J) inferInstance
(TopologicalSpace.induced
(fun z : MvPolynomial.zeroLocus K J => MvPolynomial.pointToPoint (k := K) z.val)
inferInstance))
(b : @Homeomorph T (MvPolynomial.zeroLocus K I) inferInstance
(TopologicalSpace.induced
(fun z : MvPolynomial.zeroLocus K I => MvPolynomial.pointToPoint (k := K) z.val)
inferInstance))
(P : Fin m → MvPolynomial (Fin n) K),
∀ (z : S) (i : Fin m),
(b ⟨f z.val, hST z.property⟩).val i = MvPolynomial.aeval (a z).val (P i) := by sorry
end PhilipponMultiplicity