Seam–interior smooth compatibility for the two-disk quotient
ProvedSP4Seam.seam_transition_compatibilityLet , let , and put and , with their Euclidean subspace topologies. Give its standard stereographic smooth structure. Fix a homeomorphism . Let
have the quotient topology, where the displayed pairs generate the equivalence relation. Write for the quotient images, , and .
The open seam is the image of the explicit bicollar
This is the source's homeomorphism onto the open seam; are open and cover the quotient. The two interiors are disjoint. The quotient seam itself corresponds to .
For each , write . Let be the standard stereographic chart selected at , including the source's orthonormal-basis identification with , and let be the continuous linear identification . The seam regional chart is specified by
on its chart source. For every and , the corresponding regional charts and give the original Euclidean disk-interior coordinates, and . These regional charts are partial homeomorphisms from the actual quotient to , obtained using the open-region inclusions.
For any two such regional charts , define only on its natural overlap domain . Every smoothness assertion below is over on exactly that domain, including the case of an empty overlap. It does not assert smoothness of a totalized inverse outside the domain. All dimensions are included.
For every and every homeomorphism , the explicit regional charts on satisfy all four assertions: (i) for every , the seam-to-left-interior transition is on its natural overlap source; (ii) for every such , the reverse transition is on its natural overlap source; (iii) if is smooth between the standard spheres, then for every , the right-interior-to-seam transition is on its natural overlap source; and (iv) if is smooth between the standard spheres, then for every such , the seam-to-right-interior transition is on its natural overlap source. The smoothness assumptions in (iii) and (iv) remain inside their respective implications. In particular, a smooth boundary diffeomorphism supplies both assumptions, without changing the stronger unconditional left-side assertions.
For in the sphere chart source, the geometric overlap formulas, before application of and , are
In both inverse formulas, . The actual inverse overlap additionally requires on the left, or on the right, to belong to the source of . Thus the domain must not be replaced by the whole annulus. These formulas identify the coordinate changes being asserted smooth; they are not a proof explanation.
This single target groups four proved assertions from the cited source. It concerns actual regional chart transitions; it does not assert a global smooth-manifold instance, a diffeomorphism with the standard sphere, or a decomposition of an arbitrary homotopy sphere into two standard disks.
import Mathlib import Definitions.Def_SPC4DiskCharts import Definitions.Def_SP4Gluing import Definitions.Def_SP4PullbackCharts import Definitions.Def_SP4SeamPullbackGroupoid import Definitions.Def_SP4SeamDisk import Definitions.Def_SP4SeamHemispherePart1 import Definitions.Def_SP4SeamHemispherePart2 import Definitions.Def_SP4SeamHemispherePart3 set_option autoImplicit false open Set Metric SP4Gluing SPC4Disk SP4Seam open scoped ContDiff Manifold
theorem SP4Seam.seam_transition_compatibility {m : ℕ}
(φ : sphere (0 : EuclideanSpace ℝ (Fin (m + 1))) 1 ≃ₜ
sphere (0 : EuclideanSpace ℝ (Fin (m + 1))) 1) :
(∀ (x : openSeam φ) (y : interiorFst φ),
ContDiffOn ℝ ∞ ((regionChart (isOpen_openSeam φ) x).symm.trans
(regionChart (isOpen_interiorFst φ) y))
((regionChart (isOpen_openSeam φ) x).symm.trans
(regionChart (isOpen_interiorFst φ) y)).source) ∧
(∀ (x : openSeam φ) (y : interiorFst φ),
ContDiffOn ℝ ∞ ((regionChart (isOpen_interiorFst φ) y).symm.trans
(regionChart (isOpen_openSeam φ) x))
((regionChart (isOpen_interiorFst φ) y).symm.trans
(regionChart (isOpen_openSeam φ) x)).source) ∧
(ContMDiff (𝓡 m) (𝓡 m) ∞ φ.symm →
∀ (x : openSeam φ) (y : interiorSnd φ),
ContDiffOn ℝ ∞ ((regionChart (isOpen_interiorSnd φ) y).symm.trans
(regionChart (isOpen_openSeam φ) x))
((regionChart (isOpen_interiorSnd φ) y).symm.trans
(regionChart (isOpen_openSeam φ) x)).source) ∧
(ContMDiff (𝓡 m) (𝓡 m) ∞ φ →
∀ (x : openSeam φ) (y : interiorSnd φ),
ContDiffOn ℝ ∞ ((regionChart (isOpen_openSeam φ) x).symm.trans
(regionChart (isOpen_interiorSnd φ) y))
((regionChart (isOpen_openSeam φ) x).symm.trans
(regionChart (isOpen_interiorSnd φ) y)).source) := by sorry