Nondegenerate loops with uniformly close fundamental solutions are joined
ProvedCauchyRiemannIndex.joined_of_fundamentalSolution_closeLet be continuous, with not an eigenvalue of . Then there is with the following property. Let be continuous -periodic loops of symmetric matrices with
whose asymptotic operators and are nondegenerate, and let be their fundamental solutions (, on , and likewise for ). If
(entrywise maximum norm), then there is a continuous family of continuous -periodic loops of symmetric matrices from to such that every is nondegenerate.
So, near any nondegenerate symplectic arc, nondegenerate asymptotic operators on the trivial bundle whose time- fundamental solutions follow the arc uniformly closely all lie in one path component of the space of nondegenerate asymptotic operators (Wendl, Lecture 3, §3.4). The radius depends only on the arc . The arc itself need not be differentiable.
Formalization Note. is Mat n (real matrices indexed by Fin n ⊕ Fin n) and is Matrix.J. The arc is ψ : C(unitInterval, Mat n) with ∀ t, IsSymplectic (ψ t) and (1 - ψ 1).det ≠ 0. Loops satisfy IsSymLoop (continuous, -periodic, symmetric values) and IsNondegenerate; IsFundamentalSolution S Ψ means and HasDerivAt Ψ (J₀ n * S t * Ψ t) t for all . The uniform closeness on is written entrywise: ∀ t : unitInterval, ∀ i j, |Ψ t i j - ψ t i j| < ε. The family is H : C(unitInterval × ℝ, Mat n) with H (0, t) = S t, H (1, t) = S' t, and IsSymLoop, IsNondegenerate for every slice fun t => H (τ, t), the same form as Theorem 3.34.
import Definitions.Def_CauchyRiemannIndex_Setting import Mathlib.Analysis.Calculus.ContDiff.Basic
namespace CauchyRiemannIndex
open MeasureTheory Matrix Filter Topology
open scoped ENNReal NNReal ContDiff RealInnerProductSpace
/-- Around a path `ψ` in `SP(n)` there is a uniform neighbourhood such that any two nondegenerate
loops of symmetric matrices vanishing at `0`, whose fundamental solutions on `[0, 1]` lie in it,
are joined by a continuous family of nondegenerate loops of symmetric matrices. -/
theorem joined_of_fundamentalSolution_close (n : ℕ) (ψ : C(unitInterval, Mat n))
(hψ : ∀ t, IsSymplectic (ψ t)) (hψ1 : (1 - ψ 1).det ≠ 0) :
∃ ε > 0, ∀ S S' Ψ Ψ' : ℝ → Mat n, IsSymLoop S → IsSymLoop S' → IsNondegenerate S →
IsNondegenerate S' → S 0 = 0 → S' 0 = 0 → IsFundamentalSolution S Ψ →
IsFundamentalSolution S' Ψ' → (∀ t : unitInterval, ∀ i j, |Ψ t i j - ψ t i j| < ε) →
(∀ t : unitInterval, ∀ i j, |Ψ' t i j - ψ t i j| < ε) →
∃ H : C(unitInterval × ℝ, Mat n), (∀ t, H (0, t) = S t) ∧ (∀ t, H (1, t) = S' t) ∧
∀ τ, IsSymLoop (fun t => H (τ, t)) ∧ IsNondegenerate (fun t => H (τ, t)) := by
sorry
end CauchyRiemannIndex