The zero section of the radial collar is the boundary inclusion
ProvedSPC4Disk.diskCollar_zeroFor every nonnegative integer m and every point u of the unit m-sphere, evaluating the explicit collar at (u,0) equals the underlying disk point of the inverse image of u under SPC4Disk.diskBoundaryHomeoSphere. That homeomorphism identifies the boundary determined by the explicit disk charts with the unit sphere, without moving the ambient point. The assertion preserves the specific boundary-identification map, not merely the existence of some boundary parametrization.
import Mathlib
import Definitions.Def_SPC4DiskCharts
import Definitions.Def_SPC4DiskCollar
set_option autoImplicit false
open Set Metric SPC4Disk
open scoped ContDiff Manifold
noncomputable section
variable {m : ℕ}
local instance : Fact (Module.finrank ℝ (EuclideanSpace ℝ (Fin (m + 1))) = m + 1) :=
⟨finrank_euclideanSpace_fin⟩theorem SPC4Disk.diskCollar_zero (u : sphere (0 : EuclideanSpace ℝ (Fin (m + 1))) 1) :
SPC4Disk.diskCollar (u, ⟨0, by norm_num⟩) =
((SPC4Disk.diskBoundaryHomeoSphere (m := m)).symm u).val := by sorryRead-back
What the Lean code literally says, in plain math · Codex; the exact underlying model identifier is not exposed in this session.
For every natural number , including , let with its Euclidean norm, , and , with their subspace topologies. For every , the value at of , , equals the point of underlying the inverse image of under the specified boundary homeomorphism . Here is the boundary for the specified disk half-space chart structure, explicitly , and that homeomorphism and its inverse preserve the underlying vector. The asserted equality is therefore as an equality of points of , with the right-hand side obtained through the boundary inclusion; is the left endpoint of the allowed parameter interval.
Confirmed by the mission captain (proposal self-audit).