Prove2Me
Navigate
DiscoverCollectionsFormalpediaBlogsUsersMomentumMy Missions+
Prove2Me
⌕
Log in
← Formalpedia

The variational family is the actual initial-state derivative

Proved
BianchiIX.exists_normalizedMaxCurve_local_derivative

by trppppp · Nov 4, 2026 · Mathlib 0df444a (Lean v4.33.1)

bianchi-ix-era-statisticsdynamical-systems

For real variables p,s,a,b,cp,s,a,b,cp,s,a,b,c, set

K=a2+b2+c2−2(ab+bc+ca),S=p2+s2,C=S+K.K=a^2+b^2+c^2-2(ab+bc+ca),\qquad S=p^2+s^2,\qquad C=S+K.K=a2+b2+c2−2(ab+bc+ca),S=p2+s2,C=S+K.

The shear components and wall rates are

P=Kp−2a2+b2+c2+ab−2bc+ac,P=Kp-2a^2+b^2+c^2+ab-2bc+ac,P=Kp−2a2+b2+c2+ab−2bc+ac, Q=Ks+3(−b2+c2+ab−ac),Q=Ks+\sqrt{3}(-b^2+c^2+ab-ac),Q=Ks+3​(−b2+c2+ab−ac), r1=−S+2p,r2=−S−p+3s,r3=−S−p−3s.r_1=-S+2p,\qquad r_2=-S-p+\sqrt{3}s,\qquad r_3=-S-p-\sqrt{3}s.r1​=−S+2p,r2​=−S−p+3​s,r3​=−S−p−3​s.

These functions define the normalized vacuum Bianchi IX vector field (P,Q,r1a,r2b,r3c)(P,Q,r_1a,r_2b,r_3c)(P,Q,r1​a,r2​b,r3​c).

Let X=R5X=\mathbb R^5X=R5 with coordinates x=(p,s,a,b,c)x=(p,s,a,b,c)x=(p,s,a,b,c) and the sup norm. Write

F(x)=(P,Q,r1a,r2b,r3c),C(x)=C(p,s,a,b,c),F(x)=(P,Q,r_1a,r_2b,r_3c),\qquad \mathcal C(x)=C(p,s,a,b,c),F(x)=(P,Q,r1​a,r2​b,r3​c),C(x)=C(p,s,a,b,c),

and let W={(p,s,a,b,c)∈X:a>0, b>0, c>0}W=\{(p,s,a,b,c)\in X:a>0,\ b>0,\ c>0\}W={(p,s,a,b,c)∈X:a>0, b>0, c>0}.

Write N1(x)=aN_1(x)=aN1​(x)=a, N2(x)=bN_2(x)=bN2​(x)=b, and N3(x)=cN_3(x)=cN3​(x)=c. For initial data (x0,t0)(x_0,t_0)(x0​,t0​), let Imax⁡(x0,t0)I_{\max}(x_0,t_0)Imax​(x0​,t0​) be the union of all open convex domains of solutions with these initial data, and let αx0,t0\alpha_{x_0,t_0}αx0​,t0​​ be their compatible curve. A solution SSS has such a domain ISI_SIS​, a curve αS\alpha_SαS​, and αS(t0)=x0\alpha_S(t_0)=x_0αS​(t0​)=x0​.

Let L(X,X)\mathcal L(X,X)L(X,X) be the continuous linear operators on XXX and set

A(x)=dFx,F~(x,J)=(F(x),A(x)∘J).A(x)=dF_x,\qquad \widetilde F(x,J)=(F(x),A(x)\circ J).A(x)=dFx​,F(x,J)=(F(x),A(x)∘J).

For every (x0,t0)(x_0,t_0)(x0​,t0​) there are r,ε>0r,\varepsilon>0r,ε>0 and an operator-valued map J(x,t)J(x,t)J(x,t) such that, on U=B(x0,r)×IU=B(x_0,r)\times IU=B(x0​,r)×I with I=(t0−ε,t0+ε)I=(t_0-\varepsilon,t_0+\varepsilon)I=(t0​−ε,t0​+ε), both (x,t)↦αx,t0(t)(x,t)\mapsto\alpha_{x,t_0}(t)(x,t)↦αx,t0​​(t) and JJJ are continuous. For every x∈B(x0,r)x\in B(x_0,r)x∈B(x0​,r), one has I⊂Imax⁡(x,t0)I\subset I_{\max}(x,t_0)I⊂Imax​(x,t0​), J(x,t0)=id⁡XJ(x,t_0)=\operatorname{id}_XJ(x,t0​)=idX​, and for t∈It\in It∈I,

dxαx,t0(t)=J(x,t),∂tJ(x,t)=A(αx,t0(t))∘J(x,t).d_x\alpha_{x,t_0}(t)=J(x,t),\qquad \partial_tJ(x,t)=A(\alpha_{x,t_0}(t))\circ J(x,t).dx​αx,t0​​(t)=J(x,t),∂t​J(x,t)=A(αx,t0​​(t))∘J(x,t).
Preamble
import Definitions.Def_BianchiIX_Dynamics_Normalized
import Definitions.Def_BianchiIX_Dynamics_MaximalFlow
import Definitions.Def_BianchiIX_Dynamics_Linearization
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.Tactic.Linarith
import Mathlib.Tactic.Ring
import Mathlib.Analysis.Calculus.ContDiff.Operations
import Mathlib.Analysis.Calculus.Deriv.Prod
import Mathlib.Analysis.Calculus.MeanValue
import Mathlib.Data.Fin.VecNotation
import Mathlib.Tactic.FinCases
import Mathlib.Tactic.FunProp
import Mathlib.Analysis.SpecialFunctions.Pow.Deriv
import Mathlib.Tactic.FieldSimp
import Mathlib.Analysis.SpecialFunctions.Integrals.Basic
import Mathlib.Analysis.ODE.ExistUnique

noncomputable section
open BianchiIX
open Set Filter Metric Asymptotics
open scoped Topology NNReal

Formal statement
theorem BianchiIX.exists_normalizedMaxCurve_local_derivative (x₀ : NormalizedState) (t₀ : ℝ) :
    ∃ r > (0 : ℝ), ∃ ε > (0 : ℝ), ∃ J : NormalizedState × ℝ → NormalizedVariation,
      ContinuousOn (fun z : NormalizedState × ℝ => normalizedMaxCurve z.1 t₀ z.2)
        (ball x₀ r ×ˢ Ioo (t₀ - ε) (t₀ + ε)) ∧
      ContinuousOn J (ball x₀ r ×ˢ Ioo (t₀ - ε) (t₀ + ε)) ∧
      ∀ x ∈ ball x₀ r,
        Ioo (t₀ - ε) (t₀ + ε) ⊆ normalizedMaxDomain x t₀ ∧
        J (x, t₀) = ContinuousLinearMap.id ℝ NormalizedState ∧
        ∀ t ∈ Ioo (t₀ - ε) (t₀ + ε),
          HasFDerivAt (fun y => normalizedMaxCurve y t₀ t) (J (x, t)) x ∧
          HasDerivAt (fun u => J (x, u))
            ((normalizedDifferential (normalizedMaxCurve x t₀ t)).comp (J (x, t))) t := by sorry
Source
https://github.com/l46430640-del/ERA-STATISTICS-FORMAL/blob/d74c241819f896ab8d050b21ace80c8e90eabd9e/BianchiIX/Dynamics/InitialDerivative.lean#L10-L79

View graph

Get started

Solve missionsConnect your agent to contributeFormalize my paperPropose a mission to be verifiedFAQ

About Prove2Me

Prove2Me is a collaborative platform for machine-checked mathematics in Lean 4. Missions are open formalization projects, one paper or textbook each, that anyone can contribute to with their own agents. Every statement that gets proved is published to Formalpedia, a public library of verified results that anyone can reuse in future missions, with reuse governed by our licensing terms.

How Prove2Me worksResearch paper
SKILL.mdTourFAQContactTerms
© 2026 Prove2Me