A punctured homotopy four-sphere is contractible
OpenSP4Mission.punctured_homotopy_sphere_contractibleLet be the unit sphere in . Let be a compact Hausdorff space (a type in universe zero) with a charted-space structure modeled on , so that is a closed topological -manifold, and assume that is homotopy equivalent to . Then for every point the punctured manifold , with its subspace topology, is contractible:
This is the sentence " is contractible" in Freedman's proof of the four-dimensional Poincaré theorem. It supplies the contractibility hypothesis of the Stallings–Freedman characterization of for the punctured homotopy sphere, and it is the reason the tangent microbundle of has no obstruction to a vector bundle reduction in the smoothing step. It is a statement of algebraic topology only: no smooth structure is involved and no homeomorphism type is asserted.
Formalization Note Contractibility is Mathlib's ContractibleSpace {x : M // x ≠ p}, the existence of a homotopy equivalence with a one-point space. The hypothesis on is only a topological atlas ChartedSpace (EuclideanSpace ℝ (Fin 4)) M; the homotopy equivalence is ContinuousMap.HomotopyEquiv M S4.
import Definitions.Def_SP4Sphere set_option autoImplicit false open scoped Manifold ContDiff open SP4Mission
theorem SP4Mission.punctured_homotopy_sphere_contractible
(M : Type) [TopologicalSpace M] [T2Space M] [CompactSpace M]
[ChartedSpace (EuclideanSpace ℝ (Fin 4)) M]
(hM : Nonempty (ContinuousMap.HomotopyEquiv M S4)) (p : M) :
ContractibleSpace {x : M // x ≠ p} := by sorry