Documentation

TauCeti.Geometry.Manifold.Morse.Deformation

Deformation of sublevels #

Let f be a smooth real function on a boundaryless finite-dimensional manifold M, and let a ≤ b be such that the band f⁻¹[a, b] is compact and contains no critical point of f. Then the sublevel M_b = {f ≤ b} deformation retracts onto M_a = {f ≤ a}, by a homotopy fixing M_a pointwise (TauCeti.exists_sublevelDeformation); in particular the inclusion of M_a into M_b is a homotopy equivalence (TauCeti.exists_sublevelHomotopyEquiv). The manifold itself need not be compact, nor σ-compact.

Since M_a is a strong deformation retract of M_b, any two retractions of M_b onto M_a are homotopic relative to M_a (TauCeti.homotopicRel_sublevel_retraction). So the retraction is determined up to such homotopy by f, a and b alone, whatever vector field or metric produced it. In particular, for a ≤ a' ≤ b' ≤ b, the retraction of M_b restricted to M_{b'} is homotopic relative to M_a to the composite of the retractions of M_{b'} onto M_{a'} and of M_{a'} onto M_a (TauCeti.homotopicRel_sublevel_retraction_comp_sublevelInclusion).

Following Milnor, the deformation is the flow of a vector field X with df(X) = -1 on the band, along which f decreases at unit speed. Since df(X) ≤ 0 everywhere, the time-(b - a) map of this flow is a diffeomorphism of M carrying M_b onto M_a and the level f⁻¹(b) onto f⁻¹(a) (TauCeti.exists_diffeomorph_sublevel); in particular M_b is homeomorphic to M_a (TauCeti.exists_sublevelHomeomorph).

Following each point of the band down its flow line to the level a shows that the band itself is a product: f⁻¹[a, b] is homeomorphic to f⁻¹(a) × [a, b] by a homeomorphism preserving the value of f and fixing the level f⁻¹(a) (TauCeti.exists_bandHomeomorph).

Running such a flow for a longer time deforms the whole manifold, through maps along which f never increases, so that M_b ends in the open sublevel {f < a} (TauCeti.exists_ambientSublevelDeformation). Across a critical level c the same flow, built away from a compact neighbourhood of the critical points, deforms {f ≤ c + ε} into {f < c - ε} ∪ U for any open U containing the critical points of a compact band around c (TauCeti.exists_criticalLevelDeformation). These critical points may be degenerate, and need not be finite in number. Such ambient deformations are the steps of the Lusternik–Schnirelmann bound on the number of critical points of a smooth function.

Main declarations #

References #

theorem TauCeti.exists_flow_apply_eq_sub_of_isCompact {E : Type u_1} [NormedAddCommGroup E] [NormedSpace ℝ E] [FiniteDimensional ℝ E] {H : Type u_2} [TopologicalSpace H] {I : ModelWithCorners ℝ E H} {M : Type u_3} [TopologicalSpace M] [ChartedSpace H M] [T2Space M] [I.Boundaryless] [IsManifold I (↑⊤) M] {f : M → ℝ} (hf : ContMDiff I (modelWithCornersSelf ℝ ℝ) (↑⊤) f) {K : Set M} (hK : IsCompact K) (hreg : ∀ x ∈ K, mfderiv% f x ≠ 0) :
∃ (φ : Flow ℝ M), (ContMDiff ((modelWithCornersSelf ℝ ℝ).prod I) I ↑⊤ fun (p : ℝ × M) => φ.toFun p.1 p.2) ∧ (∀ (x : M), Antitone fun (t : ℝ) => f (φ.toFun t x)) ∧ ∃ (U : Set M), IsOpen U ∧ K ⊆ U ∧ ∀ (x : M) (r t : ℝ), r ≤ t → (∀ s ∈ Set.Icc r t, φ.toFun s x ∈ U) → f (φ.toFun t x) = f (φ.toFun r x) - (t - r)

A descending flow lowering f at unit speed near a compact set of regular points. If f is smooth and the compact set K contains no critical point of f, there is a flow φ on M, jointly smooth in time and space, along which f never increases, and an open neighbourhood U of K such that f decreases at unit speed along every orbit segment lying in U: if φ s x ∈ U for all s ∈ [r, t], then f (φ t x) = f (φ r x) - (t - r).

theorem TauCeti.exists_flow_apply_eq_sub {E : Type u_1} [NormedAddCommGroup E] [NormedSpace ℝ E] [FiniteDimensional ℝ E] {H : Type u_2} [TopologicalSpace H] {I : ModelWithCorners ℝ E H} {M : Type u_3} [TopologicalSpace M] [ChartedSpace H M] [T2Space M] [I.Boundaryless] [IsManifold I (↑⊤) M] {f : M → ℝ} {a b : ℝ} (hf : ContMDiff I (modelWithCornersSelf ℝ ℝ) (↑⊤) f) (hcompact : IsCompact (f ⁻¹' Set.Icc a b)) (hreg : ∀ (x : M), a ≤ f x → f x ≤ b → mfderiv% f x ≠ 0) :
∃ (φ : Flow ℝ M), (ContMDiff ((modelWithCornersSelf ℝ ℝ).prod I) I ↑⊤ fun (p : ℝ × M) => φ.toFun p.1 p.2) ∧ (∀ (x : M), Antitone fun (t : ℝ) => f (φ.toFun t x)) ∧ (∀ (x : M) (t : ℝ), a ≤ f x → f x ≤ b → 0 < t → f (φ.toFun t x) < f x) ∧ ∀ (x : M) (t : ℝ), 0 ≤ t → a ≤ f x - t → f x ≤ b → f (φ.toFun t x) = f x - t

A unit-speed descending flow across a band without critical points. If f is smooth and the band f⁻¹[a, b] is compact and contains no critical point of f, there is a flow φ on M, jointly smooth in time and space, along which f never increases, strictly decreases from every point of the band, and decreases at unit speed through the band: if f x ≤ b, t ≥ 0 and f x - t ≥ a, then f (φ t x) = f x - t.

theorem TauCeti.exists_sublevelDeformation {E : Type u_1} [NormedAddCommGroup E] [NormedSpace ℝ E] [FiniteDimensional ℝ E] {H : Type u_2} [TopologicalSpace H] {I : ModelWithCorners ℝ E H} {M : Type u_3} [TopologicalSpace M] [ChartedSpace H M] [T2Space M] [I.Boundaryless] [IsManifold I (↑⊤) M] {f : M → ℝ} {a b : ℝ} (hf : ContMDiff I (modelWithCornersSelf ℝ ℝ) (↑⊤) f) (hab : a ≤ b) (hcompact : IsCompact (f ⁻¹' Set.Icc a b)) (hreg : ∀ (x : M), a ≤ f x → f x ≤ b → mfderiv% f x ≠ 0) :
∃ (r : C(↑{x : M | f x ≤ b}, ↑{x : M | f x ≤ a})), (∀ (x : ↑{x : M | f x ≤ a}), r ((sublevelInclusion f a b hab) x) = x) ∧ Nonempty (((sublevelInclusion f a b hab).comp r).HomotopyRel (ContinuousMap.id ↑{x : M | f x ≤ b}) {x : ↑{x : M | f x ≤ b} | f ↑x ≤ a})

Deformation of sublevels across a band without critical points (Milnor, Theorem 3.1). If f is smooth, a ≤ b, and the band f⁻¹[a, b] is compact and contains no critical point of f, then the sublevel {f ≤ a} is a strong deformation retract of {f ≤ b}: there is a retraction r of {f ≤ b} onto {f ≤ a} and a homotopy from the inclusion of r to the identity fixing {f ≤ a} pointwise.

theorem TauCeti.exists_sublevelHomotopyEquiv {E : Type u_1} [NormedAddCommGroup E] [NormedSpace ℝ E] [FiniteDimensional ℝ E] {H : Type u_2} [TopologicalSpace H] {I : ModelWithCorners ℝ E H} {M : Type u_3} [TopologicalSpace M] [ChartedSpace H M] [T2Space M] [I.Boundaryless] [IsManifold I (↑⊤) M] {f : M → ℝ} {a b : ℝ} (hf : ContMDiff I (modelWithCornersSelf ℝ ℝ) (↑⊤) f) (hab : a ≤ b) (hcompact : IsCompact (f ⁻¹' Set.Icc a b)) (hreg : ∀ (x : M), a ≤ f x → f x ≤ b → mfderiv% f x ≠ 0) :
∃ (e : ContinuousMap.HomotopyEquiv ↑{x : M | f x ≤ a} ↑{x : M | f x ≤ b}), ∀ (x : ↑{x : M | f x ≤ a}), ↑(e.toFun x) = ↑x

The sublevels on either side of a band without critical points are homotopy equivalent. Under the hypotheses of TauCeti.exists_sublevelDeformation, the inclusion of {f ≤ a} into {f ≤ b} is a homotopy equivalence.

theorem TauCeti.homotopicRel_sublevel_retraction {E : Type u_1} [NormedAddCommGroup E] [NormedSpace ℝ E] [FiniteDimensional ℝ E] {H : Type u_2} [TopologicalSpace H] {I : ModelWithCorners ℝ E H} {M : Type u_3} [TopologicalSpace M] [ChartedSpace H M] [T2Space M] [I.Boundaryless] [IsManifold I (↑⊤) M] {f : M → ℝ} {a b : ℝ} (hf : ContMDiff I (modelWithCornersSelf ℝ ℝ) (↑⊤) f) (hab : a ≤ b) (hcompact : IsCompact (f ⁻¹' Set.Icc a b)) (hreg : ∀ (x : M), a ≤ f x → f x ≤ b → mfderiv% f x ≠ 0) {r r' : C(↑{x : M | f x ≤ b}, ↑{x : M | f x ≤ a})} (hr : ∀ (x : ↑{x : M | f x ≤ a}), r ((sublevelInclusion f a b hab) x) = x) (hr' : ∀ (x : ↑{x : M | f x ≤ a}), r' ((sublevelInclusion f a b hab) x) = x) :
r.HomotopicRel r' {x : ↑{x : M | f x ≤ b} | f ↑x ≤ a}

Retractions across a band without critical points are unique up to homotopy. Under the hypotheses of TauCeti.exists_sublevelDeformation, any two retractions of {f ≤ b} onto {f ≤ a} are homotopic relative to {f ≤ a}. In particular, the deformation retraction does not depend, up to such a homotopy, on the descending vector field or the metric used to build it.

theorem TauCeti.homotopicRel_sublevel_retraction_comp_sublevelInclusion {E : Type u_1} [NormedAddCommGroup E] [NormedSpace ℝ E] [FiniteDimensional ℝ E] {H : Type u_2} [TopologicalSpace H] {I : ModelWithCorners ℝ E H} {M : Type u_3} [TopologicalSpace M] [ChartedSpace H M] [T2Space M] [I.Boundaryless] [IsManifold I (↑⊤) M] {f : M → ℝ} {a b : ℝ} (hf : ContMDiff I (modelWithCornersSelf ℝ ℝ) (↑⊤) f) {a' b' : ℝ} (haa' : a ≤ a') (ha'b' : a' ≤ b') (hb'b : b' ≤ b) (hcompact : IsCompact (f ⁻¹' Set.Icc a b')) (hreg : ∀ (x : M), a ≤ f x → f x ≤ b' → mfderiv% f x ≠ 0) {r : C(↑{x : M | f x ≤ b}, ↑{x : M | f x ≤ a})} {r₁ : C(↑{x : M | f x ≤ b'}, ↑{x : M | f x ≤ a'})} {r₂ : C(↑{x : M | f x ≤ a'}, ↑{x : M | f x ≤ a})} (hr : ∀ (x : ↑{x : M | f x ≤ a}), r ((sublevelInclusion f a b ⋯) x) = x) (hr₁ : ∀ (x : ↑{x : M | f x ≤ a'}), r₁ ((sublevelInclusion f a' b' ha'b') x) = x) (hr₂ : ∀ (x : ↑{x : M | f x ≤ a}), r₂ ((sublevelInclusion f a a' haa') x) = x) :
(r.comp (sublevelInclusion f b' b hb'b)).HomotopicRel (r₂.comp r₁) {x : ↑{x : M | f x ≤ b'} | f ↑x ≤ a}

Retractions across nested bands commute up to homotopy. Let a ≤ a' ≤ b' ≤ b, with the band f⁻¹[a, b'] compact and free of critical points. Restricting a retraction of {f ≤ b} onto {f ≤ a} to {f ≤ b'} gives, up to homotopy relative to {f ≤ a}, the composite of a retraction of {f ≤ b'} onto {f ≤ a'} with a retraction of {f ≤ a'} onto {f ≤ a}. Nothing is assumed about the band f⁻¹[b', b].

theorem TauCeti.exists_diffeomorph_sublevel {E : Type u_1} [NormedAddCommGroup E] [NormedSpace ℝ E] [FiniteDimensional ℝ E] {H : Type u_2} [TopologicalSpace H] {I : ModelWithCorners ℝ E H} {M : Type u_3} [TopologicalSpace M] [ChartedSpace H M] [T2Space M] [I.Boundaryless] [IsManifold I (↑⊤) M] {f : M → ℝ} {a b : ℝ} (hf : ContMDiff I (modelWithCornersSelf ℝ ℝ) (↑⊤) f) (hab : a ≤ b) (hcompact : IsCompact (f ⁻¹' Set.Icc a b)) (hreg : ∀ (x : M), a ≤ f x → f x ≤ b → mfderiv% f x ≠ 0) :
∃ (Φ : Diffeomorph I I M M ↑⊤), ∀ (x : M), (f (Φ x) ≤ a ↔ f x ≤ b) ∧ (f (Φ x) = a ↔ f x = b)

Sublevels on either side of a band without critical points are diffeomorphic (Milnor, Theorem 3.1). If f is smooth, a ≤ b, and the band f⁻¹[a, b] is compact and contains no critical point of f, then there is a diffeomorphism Φ of M carrying the sublevel {f ≤ b} onto {f ≤ a} and the level f⁻¹(b) onto f⁻¹(a).

theorem TauCeti.exists_sublevelHomeomorph {E : Type u_1} [NormedAddCommGroup E] [NormedSpace ℝ E] [FiniteDimensional ℝ E] {H : Type u_2} [TopologicalSpace H] {I : ModelWithCorners ℝ E H} {M : Type u_3} [TopologicalSpace M] [ChartedSpace H M] [T2Space M] [I.Boundaryless] [IsManifold I (↑⊤) M] {f : M → ℝ} {a b : ℝ} (hf : ContMDiff I (modelWithCornersSelf ℝ ℝ) (↑⊤) f) (hab : a ≤ b) (hcompact : IsCompact (f ⁻¹' Set.Icc a b)) (hreg : ∀ (x : M), a ≤ f x → f x ≤ b → mfderiv% f x ≠ 0) :
∃ (e : ↑{x : M | f x ≤ b} ≃ₜ ↑{x : M | f x ≤ a}), ∀ (x : ↑{x : M | f x ≤ b}), f ↑(e x) = a ↔ f ↑x = b

Sublevels on either side of a band without critical points are homeomorphic (Milnor, Theorem 3.1). Under the hypotheses of TauCeti.exists_diffeomorph_sublevel, there is a homeomorphism from {f ≤ b} to {f ≤ a} carrying the level f⁻¹(b) onto f⁻¹(a).

theorem TauCeti.exists_bandHomeomorph {E : Type u_1} [NormedAddCommGroup E] [NormedSpace ℝ E] [FiniteDimensional ℝ E] {H : Type u_2} [TopologicalSpace H] {I : ModelWithCorners ℝ E H} {M : Type u_3} [TopologicalSpace M] [ChartedSpace H M] [T2Space M] [I.Boundaryless] [IsManifold I (↑⊤) M] {f : M → ℝ} {a b : ℝ} (hf : ContMDiff I (modelWithCornersSelf ℝ ℝ) (↑⊤) f) (hcompact : IsCompact (f ⁻¹' Set.Icc a b)) (hreg : ∀ (x : M), a ≤ f x → f x ≤ b → mfderiv% f x ≠ 0) :
∃ (e : ↑(f ⁻¹' Set.Icc a b) ≃ₜ ↑(f ⁻¹' {a}) × ↑(Set.Icc a b)), (∀ (x : ↑(f ⁻¹' Set.Icc a b)), ↑(e x).2 = f ↑x) ∧ ∀ (x : ↑(f ⁻¹' Set.Icc a b)), f ↑x = a → ↑(e x).1 = ↑x

A band without critical points is a product (Milnor, Lectures on the h-cobordism theorem, Theorem 3.4). If f is smooth and the band f⁻¹[a, b] is compact and contains no critical point of f, then there is a homeomorphism e : f⁻¹[a, b] ≃ₜ f⁻¹(a) × [a, b] whose second component is the value of f and which is the identity on the level f⁻¹(a). In particular each level f⁻¹(s), a ≤ s ≤ b, is carried onto f⁻¹(a) × {s}.

theorem TauCeti.exists_ambientSublevelDeformation {E : Type u_1} [NormedAddCommGroup E] [NormedSpace ℝ E] [FiniteDimensional ℝ E] {H : Type u_2} [TopologicalSpace H] {I : ModelWithCorners ℝ E H} {M : Type u_3} [TopologicalSpace M] [ChartedSpace H M] [T2Space M] [I.Boundaryless] [IsManifold I (↑⊤) M] {f : M → ℝ} {a b : ℝ} (hf : ContMDiff I (modelWithCornersSelf ℝ ℝ) (↑⊤) f) (hcompact : IsCompact (f ⁻¹' Set.Icc a b)) (hreg : ∀ (x : M), a ≤ f x → f x ≤ b → mfderiv% f x ≠ 0) :
∃ (Φ : C(↑unitInterval × M, M)), (∀ (x : M), Φ (0, x) = x) ∧ (∀ (t : ↑unitInterval) (x : M), f (Φ (t, x)) ≤ f x) ∧ ∀ (x : M), f x ≤ b → f (Φ (1, x)) < a

Deformation into an open lower sublevel across a band without critical points. If f is smooth and the band f⁻¹[a, b] is compact and contains no critical point of f, there is a deformation Φ of the whole manifold M, starting at the identity, along which f never increases and whose endpoint carries the closed sublevel {f ≤ b} into the open sublevel {f < a}.

theorem TauCeti.exists_criticalLevelDeformation {E : Type u_1} [NormedAddCommGroup E] [NormedSpace ℝ E] [FiniteDimensional ℝ E] {H : Type u_2} [TopologicalSpace H] {I : ModelWithCorners ℝ E H} {M : Type u_3} [TopologicalSpace M] [ChartedSpace H M] [T2Space M] [I.Boundaryless] [IsManifold I (↑⊤) M] {f : M → ℝ} (hf : ContMDiff I (modelWithCornersSelf ℝ ℝ) (↑⊤) f) {c δ : ℝ} (hδ : 0 < δ) (hcompact : IsCompact (f ⁻¹' Set.Icc (c - δ) (c + δ))) {U : Set M} (hU : IsOpen U) (hcrit : ∀ (x : M), c - δ ≤ f x → f x ≤ c + δ → mfderiv% f x = 0 → x ∈ U) :
∃ (ε : ℝ), 0 < ε ∧ ε < δ ∧ ∃ (Φ : C(↑unitInterval × M, M)), (∀ (x : M), Φ (0, x) = x) ∧ (∀ (t : ↑unitInterval) (x : M), f (Φ (t, x)) ≤ f x) ∧ ∀ (x : M), f x ≤ c + ε → f (Φ (1, x)) < c - ε ∨ Φ (1, x) ∈ U

Deformation near a critical level. Let f be smooth, let the band f⁻¹[c - δ, c + δ], δ > 0, be compact, and let U be an open set containing every critical point of f in this band. Then for some 0 < ε < δ there is a deformation Φ of the whole manifold M, starting at the identity, along which f never increases and whose endpoint carries the sublevel {f ≤ c + ε} into {f < c - ε} ∪ U.

No nondegeneracy, finiteness or isolation of the critical points is assumed. When the critical points of the band all lie on the level c, this is the deformation across a critical level used to bound the Lusternik–Schnirelmann category of M by the number of critical points of f.