Compact local diffeomorphism with a homotopy right inverse
ProvedSP4Mission.nonempty_diffeomorph_of_local_homotopy_right_inverseLet X be a compact connected Hausdorff smooth real d-manifold and let Y be a nonempty Hausdorff smooth real d-manifold, with their given smooth atlases. Suppose a continuous map f from X to Y is a smooth local diffeomorphism and admits a continuous map g from Y to X satisfying
Then
This local-to-global criterion is a supporting result for the smooth four-dimensional Poincare mission. It supplies the global diffeomorphism once an appropriate local diffeomorphism and homotopy right inverse have been constructed. It is a corollary of standard covering-space theory, valid in every finite dimension.
Formalization Note The source is assumed preconnected in Lean; its nonemptiness follows from the map g and the nonempty target. No simple-connectedness assumption or left-inverse homotopy is needed.
import Mathlib.Topology.Homotopy.Lifting import Mathlib.Topology.Homotopy.Equiv import Mathlib.Geometry.Manifold.LocalDiffeomorph import Mathlib.Geometry.Manifold.Instances.Sphere set_option autoImplicit false open scoped Topology Manifold ContDiff open ContinuousMap
theorem SP4Mission.nonempty_diffeomorph_of_local_homotopy_right_inverse
{d : ℕ}
{X Y : Type*} [TopologicalSpace X] [TopologicalSpace Y]
[T2Space X] [T2Space Y] [CompactSpace X]
[PreconnectedSpace X] [Nonempty Y]
[ChartedSpace (EuclideanSpace ℝ (Fin d)) X]
[ChartedSpace (EuclideanSpace ℝ (Fin d)) Y]
[IsManifold (𝓡 d) ∞ X] [IsManifold (𝓡 d) ∞ Y]
(f : C(X, Y)) (hf : IsLocalDiffeomorph (𝓡 d) (𝓡 d) ∞ f)
(g : C(Y, X)) (hfg : (f.comp g).Homotopic (ContinuousMap.id Y)) :
Nonempty (X ≃ₘ⟮𝓡 d, 𝓡 d⟯ Y) := by sorry