A family of fundamental-solution paths in yields a family of nondegenerate asymptotic operators
ProvedCauchyRiemannIndex.joined_of_symplecticPath_familyLet be continuous -periodic loops of symmetric matrices whose asymptotic operators and are nondegenerate, and let be their fundamental solutions: and on . Suppose there is a continuous map with
such that for every the path takes values in , starts at , and is not an eigenvalue of . Then there is a continuous family of continuous -periodic loops of symmetric matrices from to such that every is nondegenerate.
This passes from the classification of paths in to the classification of nondegenerate asymptotic operators on the trivial bundle (Wendl, Theorem 3.34): a joining of the time- fundamental-solution paths through nondegenerate symplectic arcs produces a joining of the operators through nondegenerate ones.
Formalization Note. is Mat n (real matrices indexed by Fin n ⊕ Fin n) and is Matrix.J. The loops satisfy IsSymLoop and IsNondegenerate, and the fundamental solutions IsFundamentalSolution S₀ Ψ₀, IsFundamentalSolution S₁ Ψ₁. The given family is G : C(unitInterval × unitInterval, Mat n) with G (0, t) = Ψ₀ t, G (1, t) = Ψ₁ t, IsSymplectic (G (s, t)), G (s, 0) = 1 and (1 - G (s, 1)).det ≠ 0. The conclusion has the same form as Theorem 3.34: a continuous 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).
import Definitions.Def_CauchyRiemannIndex_Setting import Mathlib.Analysis.Calculus.ContDiff.Basic
namespace CauchyRiemannIndex
open MeasureTheory Matrix Filter Topology
open scoped ENNReal NNReal ContDiff RealInnerProductSpace
/-- If the fundamental solutions of two nondegenerate loops of symmetric matrices, restricted to
`[0, 1]`, are joined by a continuous family of paths in `SP(n)`, then the two loops are joined by
a continuous family of nondegenerate loops of symmetric matrices. -/
theorem joined_of_symplecticPath_family (n : ℕ) (S₀ S₁ : ℝ → Mat n) (h₀ : IsSymLoop S₀)
(h₁ : IsSymLoop S₁) (hn₀ : IsNondegenerate S₀) (hn₁ : IsNondegenerate S₁)
(Ψ₀ Ψ₁ : ℝ → Mat n) (hΨ₀ : IsFundamentalSolution S₀ Ψ₀) (hΨ₁ : IsFundamentalSolution S₁ Ψ₁)
(G : C(unitInterval × unitInterval, Mat n)) (hG₀ : ∀ t : unitInterval, G (0, t) = Ψ₀ t)
(hG₁ : ∀ t : unitInterval, G (1, t) = Ψ₁ t) (hGs : ∀ s t, IsSymplectic (G (s, t)))
(hG0 : ∀ s, G (s, 0) = 1) (hG1 : ∀ s, (1 - G (s, 1)).det ≠ 0) :
∃ 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