Documentation

Hironaka.Resolution.Analytic.OrderReduction.GlobalizeFamCover

Step 3 of Theorem 103 in the compatible-family form: the finite cover of a compact closure #

Step 3 of the proof of [Kol07, Theorem 103] covers X by open subsets X^{(j)} on each of which "there is a smooth hypersurface of maximal contact". In the compatible-family form the value of a functor is read on a relatively compact open U, so only the compact closure of U has to be covered: finitely many of the neighbourhoods with maximal contact of [Kol07, Theorem 80 (2)] (exists_isPullbackOf_localMCClass, LocalMaximalContact.lean), embedded by ιᵢ : Nᵢ → M, suffice, and each is shrunk to an open Wᵢ with compact closure inside the range of ιᵢ (the manifold is locally compact), so that the pieces ιᵢ^{-1}(Wᵢ ∩ U) are relatively compact in the charts. The data are bundled as ShrunkMCCover T m U, a shrunk embedding cover (ShrunkMCCover.toCover : ShrunkEmbeddingCover M U, ShrunkEmbeddingCover.lean) with maximal contact on the pieces. The coproduct ⊔ᵢ Nᵢ carries the pull-back triple of T, which has a global hypersurface of maximal contact (localMCClass_pullback_sigmaDescMap, SigmaContact.lean); the open ⊔ᵢ ιᵢ^{-1}(Wᵢ ∩ U) has compact closure, and the restriction of the coproduct map to it is Kollár's g : X^* → X over U, surjective onto U and a coproduct of open embeddings (the lemmas of ShrunkEmbeddingCover, restated on ShrunkMCCover).

The descent of a family functor's value along this cover is in GlobalizeFamDescent.lean.

theorem Manifold.AnalyticTriple.exists_finite_shrunk_mcCover {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {m : ℕ} {T : AnalyticTriple ψ₀ M} (hT : BOClass m T) {K : Set M.carrier} (hK : IsCompact K) :
∃ (t : Finset M.carrier) (N : ↥t → AnalyticManifold 𝕜 E) (ι : (i : ↥t) → AnalyticMap (N i) M) (hι : ∀ (i : ↥t), IsAnalyticOpenEmbedding (ι i)) (W : ↥t → TopologicalSpace.Opens M.carrier), (∀ (i : ↥t), HasMaximalContact m (T.pullback (ι i) ⋯)) ∧ (∀ (i : ↥t), IsCompact (closure ↑(W i))) ∧ (∀ (i : ↥t), closure ↑(W i) ⊆ Set.range ⇑(ι i)) ∧ K ⊆ ⋃ (i : ↥t), ↑(W i)

A compact set of a triple of the class BOClass m is covered by finitely many opens Wᵢ with compact closures, each inside the range of an open embedding ιᵢ : Nᵢ → M whose pulled-back triple has a hypersurface of maximal contact (Step 3 of the proof of [Kol07, Theorem 103] with [Kol07, Theorem 80 (2)], on a compact set). Each point has such a neighbourhood (exists_isPullbackOf_localMCClass), which contains a compact neighbourhood of the point by local compactness; finitely many of their interiors cover the compact set.

structure Manifold.AnalyticTriple.ShrunkMCCover {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} (T : AnalyticTriple ψ₀ M) (m : ℕ) (U : TopologicalSpace.Opens M.carrier) :
Type (max (u + 1) u_1)

The data of a finite cover of the closure of a relatively compact open U by open sets Wᵢ with compact closures, each inside the range of an open embedding ιᵢ : Nᵢ → M whose pulled-back triple has a hypersurface of maximal contact (Step 3 of the proof of [Kol07, Theorem 103] on the compact closure of U).

Instances For
    theorem Manifold.AnalyticTriple.exists_shrunkMCCover {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {m : ℕ} {T : AnalyticTriple ψ₀ M} (hT : BOClass m T) {U : TopologicalSpace.Opens M.carrier} (hU : IsCompact (closure ↑U)) :

    A finite shrunk cover with maximal contact exists for every triple of the class BOClass m and every relatively compact open U (exists_finite_shrunk_mcCover for the closure of U).

    @[reducible, inline]
    abbrev Manifold.AnalyticTriple.ShrunkMCCover.toCover {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :

    The cover as a shrunk embedding cover (ShrunkEmbeddingCover), forgetting the maximal contact. The coproduct, the open ⊔ᵢ ιᵢ^{-1}(Wᵢ ∩ U) and the cover map below are those of this cover.

    Equations
    • C.toCover = { ι := ↥C.t, finite := ⋯, N := C.N, incl := C.ι, isAnalyticOpenEmbedding_incl := ⋯, V := C.W, hVc := ⋯, hVr := ⋯, hcov := ⋯ }
    Instances For
      @[reducible, inline]
      noncomputable abbrev Manifold.AnalyticTriple.ShrunkMCCover.sigma {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :

      The coproduct ⊔ᵢ Nᵢ of the pieces (Kollár's X^*).

      Equations
      Instances For
        @[reducible, inline]
        abbrev Manifold.AnalyticTriple.ShrunkMCCover.desc {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :

        The coproduct ⊔ᵢ ιᵢ : ⊔ᵢ Nᵢ → M of the embeddings (Kollár's g : X^* → X).

        Equations
        Instances For
          theorem Manifold.AnalyticTriple.ShrunkMCCover.isLocalDiffeomorph_desc {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :

          The coproduct map is a local analytic isomorphism.

          theorem Manifold.AnalyticTriple.ShrunkMCCover.isCoprodOfOpenEmbeddings_desc {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :

          The coproduct map is a coproduct of open embeddings.

          @[reducible, inline]
          noncomputable abbrev Manifold.AnalyticTriple.ShrunkMCCover.triple {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :

          The pull-back of T to the coproduct (Kollár's (X^*, g^* I, g^{-1} E)).

          Equations
          Instances For
            theorem Manifold.AnalyticTriple.ShrunkMCCover.localMCClass_triple {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) (hT : BOClass m T) :

            The pulled-back triple on the coproduct is in the class LocalMCClass m: it has a global hypersurface of maximal contact, the union of those of the pieces (Step 3 of the proof of [Kol07, Theorem 103]; localMCClass_pullback_sigmaDescMap).

            @[reducible, inline]
            abbrev Manifold.AnalyticTriple.ShrunkMCCover.opens {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :

            The open ⊔ᵢ ιᵢ^{-1}(Wᵢ ∩ U) of the coproduct.

            Equations
            Instances For
              theorem Manifold.AnalyticTriple.ShrunkMCCover.mem_opens {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) (p : C.sigma.carrier) :
              p ∈ ↑C.opens ↔ (C.ι p.fst) p.snd ∈ ↑(C.W p.fst) ∩ ↑U
              @[reducible, inline]
              abbrev Manifold.AnalyticTriple.ShrunkMCCover.closedHull {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :

              The closed set ⊔ᵢ ιᵢ^{-1}(closure Wᵢ) of the coproduct, which contains the closure of opens.

              Equations
              Instances For
                theorem Manifold.AnalyticTriple.ShrunkMCCover.isClosed_closedHull {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :
                theorem Manifold.AnalyticTriple.ShrunkMCCover.closedHull_eq_iUnion {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :
                C.closedHull = ⋃ (i : ↥C.t), ⇑(sigmaMk (fun (j : ↥C.t) => C.N j) i) '' ⇑(C.ι i) ⁻¹' closure ↑(C.W i)
                theorem Manifold.AnalyticTriple.ShrunkMCCover.isCompact_closedHull {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :

                ⊔ᵢ ιᵢ^{-1}(closure Wᵢ) is compact: finitely many pieces, each the preimage under an open embedding of a compact set inside its range.

                theorem Manifold.AnalyticTriple.ShrunkMCCover.closure_opens_subset {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :
                theorem Manifold.AnalyticTriple.ShrunkMCCover.isCompact_closure_opens {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :

                The open ⊔ᵢ ιᵢ^{-1}(Wᵢ ∩ U) has compact closure.

                theorem Manifold.AnalyticTriple.ShrunkMCCover.image_opens_subset {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :
                ⇑C.desc '' ↑C.opens ⊆ ↑U

                The coproduct map sends ⊔ᵢ ιᵢ^{-1}(Wᵢ ∩ U) into U.

                theorem Manifold.AnalyticTriple.ShrunkMCCover.image_opens_eq {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :
                ⇑C.desc '' ↑C.opens = ↑U

                The coproduct map sends ⊔ᵢ ιᵢ^{-1}(Wᵢ ∩ U) onto U: the Wᵢ cover the closure of U and each lies in the range of ιᵢ.

                @[reducible, inline]
                noncomputable abbrev Manifold.AnalyticTriple.ShrunkMCCover.coverMap {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :

                The cover map ⊔ᵢ ιᵢ^{-1}(Wᵢ ∩ U) → U, the restriction of the coproduct map.

                Equations
                Instances For
                  theorem Manifold.AnalyticTriple.ShrunkMCCover.isLocalDiffeomorph_coverMap {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :

                  The cover map is a local analytic isomorphism.

                  theorem Manifold.AnalyticTriple.ShrunkMCCover.surjective_coverMap {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {T : AnalyticTriple ψ₀ M} {m : ℕ} {U : TopologicalSpace.Opens M.carrier} (C : T.ShrunkMCCover m U) :

                  The cover map is surjective onto U.

                  The cover map is a coproduct of open embeddings.

                  theorem Hironaka.Manifold.AnalyticFamilyFunctor.CommutesWithLocalIsos.seqOn_eq_of_image_eq {𝕜 : Type} [RCLike 𝕜] {E : Type u_1} [NormedAddCommGroup E] [NormedSpace 𝕜 E] {n : ℕ} {ψ₀ : E ≃L[𝕜] Fin n → 𝕜} {M : AnalyticManifold 𝕜 E} {Dom : {M : AnalyticManifold 𝕜 E} → Manifold.AnalyticTriple ψ₀ M → Prop} {B : AnalyticFamilyFunctor ψ₀ fun {M : AnalyticManifold 𝕜 E} => Dom} (hB : B.CommutesWithLocalIsos) {N : AnalyticManifold 𝕜 E} {T : Manifold.AnalyticTriple ψ₀ M} {T' : Manifold.AnalyticTriple ψ₀ N} {g : AnalyticMap N M} (hg : IsLocalDiffeomorph (modelWithCornersSelf 𝕜 E) (modelWithCornersSelf 𝕜 E) ⊤ ⇑g) (hT'g : T'.IsPullbackOf T g) (hT : Dom T) (hT' : Dom T') {U' : TopologicalSpace.Opens N.carrier} (hU' : IsCompact (closure ↑U')) {V : TopologicalSpace.Opens M.carrier} (hV : IsCompact (closure ↑V)) (himg : ⇑g '' ↑U' = ↑V) :
                  (B.fam T' hT').seqOn U' hU' = (((B.fam T hT).seqOn V hV).pullback (AnalyticMap.restrictMap g U' V ⋯) ⋯).eraseEmpty

                  The commutation of a family functor with a local analytic isomorphism g, with the image open named: when g(U') = V, the value of the pulled-back triple on U' is the value on V pulled back along g|_{U'} : U' → V, with its empty blow-ups deleted.