Affine charts with local rational formulas for regular maps
ProvedPhilipponMultiplicity.regular_map_has_affine_rational_chartsLet be an algebraically closed field, and let and be locally closed subsets of finite products of projective spaces over , with their induced Zariski topologies. Let be regular. For each , there are open subsets and , nonnegative integers , ideals
with radical, and homeomorphisms and such that , , and each target coordinate of the restricted map is locally a quotient of polynomials in the source coordinates.
Precisely, for every and , there are an open neighborhood of and polynomials such that, for all ,
The affine zero sets carry their ordinary Zariski topologies, equivalently the topologies induced by point evaluation ideals in the corresponding polynomial prime spectra. The neighborhoods and fractions may depend on both and .
These charts compare the given multihomogeneous description of regularity with local affine rational-coordinate formulas. No irreducibility, positive-dimensionality, or characteristic-zero assumption is made.
Formalization Note. The proof constructs local polynomial lifts for regular maps by multihomogeneous substitution and proves cancellation of projective scaling factors in balanced fractions. The required affine embedding charts are now proved, completing the local rational-coordinate 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_rational_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)),
∀ (z : S) (i : Fin m), ∃ U : Set S, IsOpen U ∧ z ∈ U ∧
∃ P Q : MvPolynomial (Fin n) K, ∀ w ∈ U,
MvPolynomial.aeval (a w).val Q ≠ 0 ∧
(b ⟨f w.val, hST w.property⟩).val i =
MvPolynomial.aeval (a w).val P / MvPolynomial.aeval (a w).val Q := by sorry
end PhilipponMultiplicity