Radius slopes, square-root cone and reciprocal phases through the long-tail connection
ProvedBianchiIX.exists_restartShearTail_connection_curveWrite for the normalized vacuum Bianchi IX flow and for the constraint-one, negative-first-shear chart with primary wall and center coordinates (second shear and the other two walls). At time , denote its primary wall by and center by . Set . For define , , , and . On a shear annulus take , , , , , and . A signed annulus uses , . Here is sufficiently small and is sufficiently small thereafter. Primes are ordinary radial derivatives with labels and cutoff fixed. The long cutoff adds to . Write , and write . Take , , , . At the partial core's downward unit hit, let be the three exit parameters, the reflected core state after its connection, and the absolute arrival time on the original orbit. Write and . The physical endpoint identity says that the ascending unit entry with core equals the reflection of the projective state of this orbit at . Take , and the cutoff . For the downward radius , , , , and . Both reciprocal phases have positive derivatives and
The return is in , , and for .
import Definitions.Def_BianchiIX_Dynamics_Normalized import Definitions.Def_BianchiIX_Algebra_CoreAngle import Definitions.Def_BianchiIX_Dynamics_ProjectiveState import Definitions.Def_BianchiIX_Dynamics_MaximalFlow import Definitions.Def_BianchiIX_Dynamics_CoreAngle import Definitions.Def_BianchiIX_Dynamics_ProjectiveFlowVariation import Definitions.Def_BianchiIX_SectionRestartData import Definitions.Def_BianchiIX_ShearTransportData import Definitions.Def_BianchiIX_Dynamics_ConnectionExistence import Definitions.Def_BianchiIX_Dynamics_ConnectionReturn import Definitions.Def_BianchiIX_Dynamics_EntranceReturn import Definitions.Def_BianchiIX_EraReturnData import Definitions.Def_BianchiIX_Dynamics_ConnectionPhysicalReturn import Definitions.Def_BianchiIX_Dynamics_CoreConnectionChart import Mathlib.Analysis.SpecialFunctions.Pow.Asymptotics import Mathlib.Tactic.Linarith import Mathlib.Tactic.Positivity import Mathlib.Tactic.Ring import Mathlib.Analysis.SpecialFunctions.Pow.Continuity import Mathlib.Analysis.Calculus.ContDiff.Operations import Mathlib.Analysis.Calculus.MeanValue import Mathlib.Analysis.Calculus.Deriv.Prod import Mathlib.Analysis.Normed.Module.FiniteDimension import Mathlib.Topology.Order.Compact import Mathlib.Tactic.NormNum import Mathlib.Analysis.Calculus.Deriv.Pow import Mathlib.Analysis.Calculus.Deriv.Mul import Mathlib.Analysis.Calculus.Deriv.Add import Mathlib.Analysis.Real.Sqrt import Mathlib.Data.Fin.VecNotation import Mathlib.Tactic.FinCases import Mathlib.Tactic.FunProp import Mathlib.Analysis.SpecialFunctions.Sqrt import Mathlib.Analysis.Calculus.Deriv.Inv import Mathlib.Tactic.FieldSimp import Mathlib.Analysis.SpecialFunctions.Log.Deriv import Mathlib.Analysis.SpecialFunctions.ExpDeriv import Mathlib.Analysis.Calculus.ContDiff.Comp import Mathlib.Analysis.Calculus.Deriv.Comp import Mathlib.Analysis.SpecialFunctions.Pow.Deriv import Mathlib.Analysis.SpecialFunctions.Integrals.Basic import Mathlib.Analysis.ODE.ExistUnique import Mathlib.Analysis.SpecialFunctions.Arsinh import Mathlib.Tactic.LinearCombination import Mathlib.Analysis.SpecialFunctions.Arcosh import Mathlib.MeasureTheory.Integral.IntervalIntegral.FundThmCalculus import Mathlib.Analysis.Calculus.InverseFunctionTheorem.Deriv import Mathlib.Analysis.Calculus.Deriv.MeanValue import Mathlib.Analysis.Calculus.FDeriv.Partial import Mathlib.Analysis.SpecificLimits.Basic import Mathlib.Analysis.SpecialFunctions.Pow.Real import Mathlib.Analysis.ODE.Gronwall import Mathlib.Topology.Order.IntermediateValue import Mathlib.Analysis.Calculus.FDeriv.Symmetric import Mathlib.Analysis.Calculus.ContDiff.Deriv import Mathlib.Tactic.GCongr import Mathlib.Analysis.Calculus.Deriv.Pi import Mathlib.Analysis.Calculus.ParametricIntervalIntegral import Mathlib.MeasureTheory.Integral.DominatedConvergence import Mathlib.MeasureTheory.Integral.IntervalIntegral.DistLEIntegral import Mathlib.Topology.Order.ProjIcc import Mathlib.Analysis.Calculus.ImplicitContDiff import Mathlib.Topology.Instances.Real.Lemmas import Mathlib.Data.Matrix.Mul import Mathlib.Analysis.Calculus.Deriv.Slope import Mathlib.Topology.Order.OrderClosed import Mathlib.Tactic.Module import Mathlib.MeasureTheory.Integral.IntervalIntegral.IntegrationByParts import Mathlib.Algebra.BigOperators.Fin import Mathlib.Data.Real.Basic import Mathlib.Analysis.SpecialFunctions.Trigonometric.ArctanDeriv import Mathlib.Analysis.SpecialFunctions.Trigonometric.DerivHyp import Mathlib.Analysis.SpecialFunctions.Log.Basic import Mathlib.LinearAlgebra.Determinant import Mathlib.Topology.Instances.Matrix import Mathlib.LinearAlgebra.Matrix.Trace import Mathlib.Analysis.Calculus.FDeriv.Analytic import Mathlib.Topology.Algebra.Module.Determinant import Mathlib.Topology.MetricSpace.Thickening import Mathlib.Analysis.Normed.Operator.Basic import Mathlib.LinearAlgebra.Matrix.Notation import Mathlib.Topology.MetricSpace.Cauchy import Mathlib.Analysis.Calculus.UniformLimitsDeriv import Mathlib.Analysis.Calculus.InverseFunctionTheorem.ContDiff import Mathlib.Analysis.SpecialFunctions.ImproperIntegrals import Mathlib.Analysis.Calculus.ParametricIntegral import Mathlib.MeasureTheory.Integral.Bochner.ContinuousLinearMap noncomputable section open BianchiIX open Set
theorem BianchiIX.exists_restartShearTail_connection_curve :
∃ hstar > (0 : ℝ), ∀ h ∈ Ioc (0 : ℝ) hstar,
∀ q D P : ℝ, 3 < q → 4 < D → 6 * D + 2 < P →
∃ astar > (0 : ℝ), ∀ a ∈ Ioc (0 : ℝ) astar, ∀ ε ζ ν : ℝ,
(0 ≤ ε ∧ ε ≤ 1 / 128) →
(0 < ζ ∧ ζ ≤ a ^ P ∧ ζ ≤ 2 * ε * a) →
(0 < ν ∧ ν ≤ 2 * ε * a) → ∀ ρ ∈ Icc a (2 * a),
let s := shearTailTime a D + q / 2 * Real.log (1 / a)
let Y := restartShearTailProjectiveEntry h a q ζ ν (shearTailTime a D)
let f := fun r => partialCoreDownwardReturnState (Y r) 0
let p := restartShearReturnParameters h s ζ ν
let G := restartShearReturnState h s ζ ν
let g := fun r => G r 0
ContDiffAt ℝ 2 G ρ ∧ DifferentiableAt ℝ f ρ ∧
1 < f ρ ∧ 0 < g ρ ∧ deriv f ρ < 0 ∧ deriv g ρ < 0 ∧
|deriv g ρ / deriv f ρ - 1| ≤ 1 / (4 * p ρ 0) ∧
(3 / 4 ≤ deriv g ρ / deriv f ρ ∧ deriv g ρ / deriv f ρ ≤ 5 / 4) ∧
(∀ i : Fin 2, |deriv (fun r => G r i.succ) ρ| ≤ Real.sqrt (G ρ i.succ) * |deriv g ρ|) ∧
DifferentiableAt ℝ (fun r => 2 / f r) ρ ∧ DifferentiableAt ℝ (fun r => 2 / g r) ρ ∧
(0 < deriv (fun r => 2 / f r) ρ ∧ 0 < deriv (fun r => 2 / g r) ρ) ∧
2 / g ρ - 2 / f ρ = -2 * (g ρ - f ρ) / (f ρ * g ρ) ∧
deriv (fun r => 2 / g r) ρ / deriv (fun r => 2 / f r) ρ =
(f ρ / g ρ) ^ 2 * (deriv g ρ / deriv f ρ) := by sorry