Documentation

Hironaka.Analytic.Rueckert.ParametrizationPrimitive

The primitive normalization of a prime germ #

The first step of the local parametrization theorem [GR84, Chapter 3, Β§1] (the second alternative of [Fre17, Ch. I, 8.2] together with the Noether normalization 7.2, generalized to a d-dimensional base): a nonzero prime P βŠ† π’ͺ_n = Conv β„‚ n has a Noether normalization normMap β„‚ P e L (NoetherNormalization.lean, finite and injective) with a fibre coordinate X_{iβ‚€} (iβ‚€ βˆ‰ range e) that is a primitive element of Frac(π’ͺ_n/P) over Frac(π’ͺ_d); in the coordinates of Οƒ = substEquiv L, for the ideal P' = comap Οƒ P, its minimal polynomial Q ∈ π’ͺ_d[T] is monic irreducible with Q(X_{iβ‚€}) ∈ P', and some A ∈ π’ͺ_d βˆ– 0, B_i ∈ π’ͺ_d[T] have A Β· X_i βˆ’ B_i(X_{iβ‚€}) ∈ P' for every fibre coordinate i.

The proof assembles three pieces. (1) Noether normalization exists_noetherNormalization_analytic gives d, e, Lβ‚€; since P β‰  βŠ₯, e is not onto (exists_notMem_range_of_ne_bot: were every coordinate a base coordinate, convEmbed e would be onto π’ͺ_n and the injectivity of the normalization would force P = βŠ₯), so a fibre index i₁ exists. (2) The algebraic core PrimitiveRelations.lean (exists_linear_primitive_relations), applied to R = π’ͺ_d, S = π’ͺ_n / P with f = normMap β„‚ P e Lβ‚€ and the fibre classes ΞΎ_i = [Οƒβ‚€ X_i], returns constants c ∈ β„‚ with c_{i₁} = 1, the primitive element Ξ³ = βˆ‘ c_j ΞΎ_j, its minimal polynomial Q, and the denominators A, B_i. (3) The coordinate mix L₁ = mixLinear i₁ c (LinearMix.lean) turns the linear form into the coordinate X_{i₁}: with L = Lβ‚€.trans L₁, substEquiv L = Οƒβ‚€ ∘ σ₁, σ₁ fixes the base and the other fibre coordinates and sends X_{i₁} to βˆ‘ c_j X_j, so the normalization is unchanged and the relations of (2) read exactly as the statement demands.

If the injection e : Fin d β†ͺ Fin n is onto, the base embedding convEmbed β„‚ e : π’ͺ_d β†’ π’ͺ_n is onto (rename along the inverse bijection stays convergent).

theorem Analytic.exists_notMem_range_of_ne_bot {n d : β„•} (P : Ideal β†₯(Conv β„‚ n)) (hP : P β‰  βŠ₯) (e : Fin d β†ͺ Fin n) (L : (Fin n β†’ β„‚) ≃L[β„‚] Fin n β†’ β„‚) (hinj : Function.Injective ⇑(normMap β„‚ P e L)) :
βˆƒ (i : Fin n), i βˆ‰ Set.range ⇑e

A Noether normalization normMap β„‚ P e L of a nonzero prime P has a fibre coordinate: some index is outside the range of e. Otherwise convEmbed β„‚ e is onto π’ͺ_n, and the injectivity of mk_P ∘ Οƒ ∘ convEmbed e makes mk_P injective, i.e. P = βŠ₯.

theorem Analytic.mk_substEquiv_eval_map {n d : β„•} (P : Ideal β†₯(Conv β„‚ n)) (e : Fin d β†ͺ Fin n) (Οƒ : β†₯(Conv β„‚ n) ≃ₐ[β„‚] β†₯(Conv β„‚ n)) (Q : Polynomial β†₯(Conv β„‚ d)) (x : β†₯(Conv β„‚ n)) :

The class in π’ͺ_n / P of a polynomial in X_{iβ‚€} with coefficients embedded from the base, read in the coordinates of Οƒ, is the polynomial evaluated through mk_P ∘ Οƒ ∘ convEmbed e at the class of Οƒ X_{iβ‚€}.

theorem Analytic.exists_primitive_normalization {n : β„•} (P : Ideal β†₯(Conv β„‚ n)) [P.IsPrime] (hP : P β‰  βŠ₯) :
βˆƒ (d : β„•) (e : Fin d β†ͺ Fin n) (L : (Fin n β†’ β„‚) ≃L[β„‚] Fin n β†’ β„‚), Function.Injective ⇑(normMap β„‚ P e L) ∧ (↑(normMap β„‚ P e L)).Finite ∧ βˆƒ (iβ‚€ : Fin n) (_ : iβ‚€ βˆ‰ Set.range ⇑e) (Q : Polynomial β†₯(Conv β„‚ d)) (A : β†₯(Conv β„‚ d)), Q.Monic ∧ Irreducible Q ∧ A β‰  0 ∧ Polynomial.eval (convX β„‚ iβ‚€) (Polynomial.map (convEmbed β„‚ e).toRingHom Q) ∈ Ideal.comap (substEquiv L) P ∧ βˆ€ i βˆ‰ Set.range ⇑e, βˆƒ (B : Polynomial β†₯(Conv β„‚ d)), (convEmbed β„‚ e) A * convX β„‚ i - Polynomial.eval (convX β„‚ iβ‚€) (Polynomial.map (convEmbed β„‚ e).toRingHom B) ∈ Ideal.comap (substEquiv L) P

The primitive normalization of a nonzero prime germ ([GR84, Chapter 3, Β§1]; the second alternative of [Fre17, Ch. I, 8.2] with the Noether normalization 7.2, over a d-dimensional base): a Noether normalization with a fibre coordinate X_{iβ‚€} whose class is a primitive element, its monic irreducible minimal polynomial Q with Q(X_{iβ‚€}) ∈ comap Οƒ P, and denominators A β‰  0, B_i with A Β· X_i βˆ’ B_i(X_{iβ‚€}) ∈ comap Οƒ P for every fibre coordinate.