OAI/Geometry/HarmonicGrowth/Curvature.lean
88 declarations, 0 contain sorry, 0 declared as axioms
- lemma
OAI.HarmonicCounterexample.Berger.ComplexStructure.square_mulVecline 18 - lemma
OAI.HarmonicCounterexample.Berger.ComplexStructure.trace_zeroline 22 - lemma
OAI.HarmonicCounterexample.Berger.ComplexStructure.dot_skewline 27 - lemma
OAI.HarmonicCounterexample.Berger.trace_rank_mulline 35 - lemma
OAI.HarmonicCounterexample.Berger.trace_mul_rankline 41 - lemma
OAI.HarmonicCounterexample.Berger.trace_rank_rankline 46 - def
OAI.HarmonicCounterexample.Berger.connectionMatrixline 55Source documentation
The endomorphism v ↦ Γ(u,v), after raising the first-kind connection. This nine-low-rank decomposition permits exact finite-dimensional traces.
def connectionMatrix (J : ComplexStructure ι) (x : ι → ℝ) (a b c d e f : ℝ) (u : ι → ℝ) : Matrix ι ι ℝ := …Mentions: OAI.HarmonicCounterexample.Berger.ComplexStructure, OAI.HarmonicCounterexample.a, OAI.HarmonicCounterexample.b
- lemma
OAI.HarmonicCounterexample.Berger.connectionMatrix_traceline 65 - lemma
OAI.HarmonicCounterexample.Berger.connectionMatrix_trace_productline 77Source documentation
Exact quadratic connection trace, the difficult algebraic part of Ricci. No dimension-specific computation or assumed Gauss/Codazzi formula is used.
lemma connectionMatrix_trace_product (J : ComplexStructure ι) (x u v : ι → ℝ) (a b c d e f : ℝ) : (connectionMatrix J x a b c d e f u * connectionMatrix J x a b c d e f v).trace = 2*a*b*(x ⬝ᵥ x)*(u ⬝ᵥ v) + ((2*a+b+c*(x ⬝ᵥ x))^2 + (a+d*(x ⬝ᵥ x)+f)^2 + ((Fintype.card ι:ℝ)-2)*a^2-2*a*b)*(x ⬝ᵥ u)*(x ⬝ᵥ v) + (2*(a+d*(x ⬝ᵥ x)+f)*(b+e*(x ⬝ᵥ x)-2*f) - ((Fintype.card ι:ℝ)-2)*f^2-2*a*b)* ((J.matrix *ᵥ x) ⬝ᵥ u)*((J.matrix *ᵥ x) ⬝ᵥ v) := by …Mentions: OAI.HarmonicCounterexample.Berger.ComplexStructure, OAI.HarmonicCounterexample.a, OAI.HarmonicCounterexample.b, OAI.HarmonicCounterexample.Berger.connectionMatrix
- lemma
OAI.HarmonicCounterexample.Berger.ComplexStructure.diagonal_zeroline 120 - lemma
OAI.HarmonicCounterexample.Berger.ComplexStructure.entry_skewline 126 - lemma
OAI.HarmonicCounterexample.Berger.ComplexStructure.sum_x_entryline 129 - lemma
OAI.HarmonicCounterexample.Berger.ComplexStructure.sum_w_entryline 134 - lemma
OAI.HarmonicCounterexample.Berger.ComplexStructure.sum_entriesline 139 - def
OAI.HarmonicCounterexample.Berger.connectionCoeffline 144Source documentation
Cartesian Christoffel coefficients written in their invariant six-term form.
def connectionCoeff (J : ComplexStructure (Fin n)) (x : Space n) (a b c d e f : ℝ) (k i j : Fin n) : ℝ := …Mentions: OAI.HarmonicCounterexample.Berger.ComplexStructure, OAI.HarmonicCounterexample.Space, OAI.HarmonicCounterexample.a, OAI.HarmonicCounterexample.b
- lemma
OAI.HarmonicCounterexample.Berger.connectionCoeff_eq_matrixline 152 - lemma
OAI.HarmonicCounterexample.Berger.connectionCoeff_symmetricline 166 - lemma
OAI.HarmonicCounterexample.Berger.connectionCoeff_traceline 174 - lemma
OAI.HarmonicCounterexample.Berger.connectionCoeff_inner_traceline 183 - lemma
OAI.HarmonicCounterexample.Berger.coordDeriv_radialSquareline 199 - lemma
OAI.HarmonicCounterexample.Berger.differentiableAt_linear_entryline 210 - lemma
OAI.HarmonicCounterexample.Berger.divergence_delta_radialline 233 - lemma
OAI.HarmonicCounterexample.Berger.divergence_radial_deltaline 244 - lemma
OAI.HarmonicCounterexample.Berger.divergence_radial_cubicline 262 - lemma
OAI.HarmonicCounterexample.Berger.divergence_hopf_mixedline 283 - lemma
OAI.HarmonicCounterexample.Berger.divergence_hopf_cubicline 313 - lemma
OAI.HarmonicCounterexample.Berger.divergence_hopf_linearline 337 - lemma
OAI.HarmonicCounterexample.Berger.connectionCoeff_radial_contractionline 379 - lemma
OAI.HarmonicCounterexample.Berger.connectionCoeff_outer_traceline 403 - lemma
OAI.HarmonicCounterexample.Berger.connectionCoeff_differentiableAtline 421 - lemma
OAI.HarmonicCounterexample.Berger.connectionCoeff_divergenceline 432 - lemma
OAI.HarmonicCounterexample.Berger.connectionCoeff_trace_derivativeline 453 - theorem
OAI.HarmonicCounterexample.Berger.ricci_of_connectionCoeffline 481Source documentation
Ricci computed from the exact Christoffel ansatz on a neighbourhood. This theorem uses the frozen coordinate definition of
ricciverbatim.theorem ricci_of_connectionCoeff (g : SmoothMetric n) (J : ComplexStructure (Fin n)) {a b c d e f : Space n → ℝ} {x : Space n} {ad bd cd dd ed fd : ℝ} (hΓ : ∀ᶠ y in 𝓝 x, ∀ k i j, christoffel g y k i j = connectionCoeff J y (a y) (b y) (c y) (d y) (e y) (f y) k i j) (ha : DifferentiableAt ℝ a x) (hb : DifferentiableAt ℝ b x) (hc : DifferentiableAt ℝ c x) (hd : DifferentiableAt ℝ d x) (he : DifferentiableAt ℝ e x) (hf : DifferentiableAt ℝ f x) (had : ∀ i, coordDeriv i a x = ad*x i) (hbd : ∀ i, coordDeriv i b x = bd*x i) (hcd : ∀ i, coordDeriv i c x = cd*x i) (hdd : ∀ i, coordDeriv i d x = dd*x i) (hed : ∀ i, coordDeriv i e x = ed*x i) (hfd : ∀ i, coordDeriv i f x = fd*x i) (i j : Fin n) : let S := x ⬝ᵥ x …Mentions: OAI.HarmonicCounterexample.SmoothMetric, OAI.HarmonicCounterexample.Berger.ComplexStructure, OAI.HarmonicCounterexample.a, OAI.HarmonicCounterexample.b, OAI.HarmonicCounterexample.Space, OAI.HarmonicCounterexample.christoffel, OAI.HarmonicCounterexample.Berger.connectionCoeff, OAI.HarmonicCounterexample.coordDeriv
- def
OAI.HarmonicCounterexample.Berger.polarTensorline 533Source documentation
Polar tensor in unnormalized Cartesian coordinates. Its radial/Hopf/ horizontal eigenvalues are respectively 1,D,A.
def polarTensor (J : ComplexStructure ι) (x : ι → ℝ) (A D : ℝ) : Matrix ι ι ℝ := …
Mentions: OAI.HarmonicCounterexample.Berger.ComplexStructure
- lemma
OAI.HarmonicCounterexample.Berger.polarTensor_inverseline 537 - lemma
OAI.HarmonicCounterexample.Berger.polarTensor_mulVecline 553 - def
OAI.HarmonicCounterexample.Berger.rawPolarEntryline 582 - def
OAI.HarmonicCounterexample.Berger.lowerConnectionCoeffline 586 - lemma
OAI.HarmonicCounterexample.Berger.firstKind_rawPolarline 595Source documentation
First-kind Levi-Civita calculation, directly from coordinate derivatives.
lemma firstKind_rawPolar (J : ComplexStructure (Fin n)) {A B C : Space n → ℝ} {x : Space n} {Ad Bd Cd : ℝ} (hA : DifferentiableAt ℝ A x) (hB : DifferentiableAt ℝ B x) (hC : DifferentiableAt ℝ C x) (hAd : ∀ i, coordDeriv i A x = Ad*x i) (hBd : ∀ i, coordDeriv i B x = Bd*x i) (hCd : ∀ i, coordDeriv i C x = Cd*x i) (l i j : Fin n) : (1/2:ℝ)*(coordDeriv i (fun y => rawPolarEntry J A B C y j l) x+ coordDeriv j (fun y => rawPolarEntry J A B C y i l) x- coordDeriv l (fun y => rawPolarEntry J A B C y i j) x) = lowerConnectionCoeff J x (B x) (C x) Ad Bd Cd l i j := by …Mentions: OAI.HarmonicCounterexample.Berger.ComplexStructure, OAI.HarmonicCounterexample.Space, OAI.HarmonicCounterexample.coordDeriv, OAI.HarmonicCounterexample.Berger.rawPolarEntry, OAI.HarmonicCounterexample.Berger.lowerConnectionCoeff
- lemma
OAI.HarmonicCounterexample.Berger.lowerConnection_radialline 640 - lemma
OAI.HarmonicCounterexample.Berger.lowerConnection_hopfline 665 - lemma
OAI.HarmonicCounterexample.Berger.raise_lowerConnectionline 695Source documentation
Raising the first-kind expression gives exactly the six invariant scalar coefficients; this is an algebra theorem, not a curvature assumption.
lemma raise_lowerConnection (J : ComplexStructure (Fin n)) (x : Space n) (hx : x ⬝ᵥ x ≠ 0) (A D B C Ad Bd Cd : ℝ) (k i j : Fin n) : (∑ l, polarTensor J x A⁻¹ D⁻¹ k l*lowerConnectionCoeff J x B C Ad Bd Cd l i j) = connectionCoeff J x (Ad/(2*A)) (B-Ad/2) (Ad*(1-A⁻¹)/(x ⬝ᵥ x)+Bd/2) (Ad*(D⁻¹-A⁻¹)/(2*(x ⬝ᵥ x))+Cd/(2*D)+C*(D⁻¹-A⁻¹)/(x ⬝ᵥ x)) (-Cd/2-2*C*(1-A⁻¹)/(x ⬝ᵥ x)) (C/A) k i j := by …Mentions: OAI.HarmonicCounterexample.Berger.ComplexStructure, OAI.HarmonicCounterexample.Space, OAI.HarmonicCounterexample.Berger.polarTensor, OAI.HarmonicCounterexample.Berger.lowerConnectionCoeff, OAI.HarmonicCounterexample.Berger.connectionCoeff
- theorem
OAI.HarmonicCounterexample.Berger.christoffel_of_rawPolarline 736Source documentation
The actual Levi-Civita connection is computed from locally given Cartesian metric entries. The only assumptions are differentiability and the polar tensor identities, not any curvature or connection formula.
theorem christoffel_of_rawPolar (g : SmoothMetric n) (J : ComplexStructure (Fin n)) {A B C : Space n → ℝ} {x : Space n} {D Ad Bd Cd : ℝ} (hcoeff : ∀ᶠ y in 𝓝 x, ∀ i j, g.coeff y i j = rawPolarEntry J A B C y i j) (hx : x ⬝ᵥ x ≠ 0) (hA0 : A x ≠ 0) (hD0 : D ≠ 0) (hBval : B x = (1-A x)/(x ⬝ᵥ x)) (hCval : C x = (D-A x)/(x ⬝ᵥ x)) (hA : DifferentiableAt ℝ A x) (hB : DifferentiableAt ℝ B x) (hC : DifferentiableAt ℝ C x) (hAd : ∀ i, coordDeriv i A x = Ad*x i) (hBd : ∀ i, coordDeriv i B x = Bd*x i) (hCd : ∀ i, coordDeriv i C x = Cd*x i) (k i j : Fin n) : christoffel g x k i j = …Mentions: OAI.HarmonicCounterexample.SmoothMetric, OAI.HarmonicCounterexample.Berger.ComplexStructure, OAI.HarmonicCounterexample.Space, OAI.HarmonicCounterexample.Berger.rawPolarEntry, OAI.HarmonicCounterexample.coordDeriv, OAI.HarmonicCounterexample.christoffel
- def
OAI.HarmonicCounterexample.Berger.normalAlphaline 797 - def
OAI.HarmonicCounterexample.Berger.normalBetaline 798 - def
OAI.HarmonicCounterexample.Berger.normalGammaline 799 - def
OAI.HarmonicCounterexample.Berger.normalDeltaline 800 - def
OAI.HarmonicCounterexample.Berger.normalEpsilonline 801 - def
OAI.HarmonicCounterexample.Berger.normalZetaline 802 - def
OAI.HarmonicCounterexample.Berger.normalizedConnectionCoeffline 804 - lemma
OAI.HarmonicCounterexample.Berger.normalize_connectionline 810 - lemma
OAI.HarmonicCounterexample.Berger.differentiableAt_radialSquareline 825 - theorem
OAI.HarmonicCounterexample.Berger.christoffel_normalizedline 832Source documentation
Actual normalized Christoffel producer from first derivatives of the metric profiles. Here h=(log A)'/2 and p=(log q)'/2 in logarithmic radius.
theorem christoffel_normalized (g : SmoothMetric n) (J : ComplexStructure (Fin n)) {A q : Space n → ℝ} {x : Space n} {h p : ℝ} (hmetric : ∀ᶠ y in 𝓝 x, ∀ i j, g.coeff y i j = rawPolarEntry J A (fun z => (1-A z)/(z ⬝ᵥ z)) (fun z => A z*(q z-1)/(z ⬝ᵥ z)) y i j) (hS : x ⬝ᵥ x ≠ 0) (hA0 : A x ≠ 0) (hq0 : q x ≠ 0) (hA : DifferentiableAt ℝ A x) (hq : DifferentiableAt ℝ q x) (hAd : ∀ i, coordDeriv i A x = (2*A x*h/(x ⬝ᵥ x))*x i) (hqd : ∀ i, coordDeriv i q x = (2*q x*p/(x ⬝ᵥ x))*x i) (k i j : Fin n) : christoffel g x k i j = normalizedConnectionCoeff J x (A x) (q x) h p k i j := by …Mentions: OAI.HarmonicCounterexample.SmoothMetric, OAI.HarmonicCounterexample.Berger.ComplexStructure, OAI.HarmonicCounterexample.Space, OAI.HarmonicCounterexample.Berger.rawPolarEntry, OAI.HarmonicCounterexample.coordDeriv, OAI.HarmonicCounterexample.christoffel, OAI.HarmonicCounterexample.Berger.normalizedConnectionCoeff
- def
OAI.HarmonicCounterexample.Berger.normalAlphaDline 883 - def
OAI.HarmonicCounterexample.Berger.normalBetaDline 884 - def
OAI.HarmonicCounterexample.Berger.normalGammaDline 885 - def
OAI.HarmonicCounterexample.Berger.normalDeltaDline 886 - def
OAI.HarmonicCounterexample.Berger.normalEpsilonDline 887 - def
OAI.HarmonicCounterexample.Berger.normalZetaDline 888 - lemma
OAI.HarmonicCounterexample.Berger.gradient_normalAlphaline 890 - lemma
OAI.HarmonicCounterexample.Berger.gradient_normalBetaline 903 - lemma
OAI.HarmonicCounterexample.Berger.gradient_normalGammaline 919 - lemma
OAI.HarmonicCounterexample.Berger.gradient_normalDeltaline 935 - lemma
OAI.HarmonicCounterexample.Berger.gradient_normalEpsilonline 951 - lemma
OAI.HarmonicCounterexample.Berger.gradient_normalZetaline 971 - def
OAI.HarmonicCounterexample.Berger.normalTraceline 1001 - def
OAI.HarmonicCounterexample.Berger.normalTraceDline 1002 - def
OAI.HarmonicCounterexample.Berger.horizontalRicciNumeratorline 1004 - def
OAI.HarmonicCounterexample.Berger.verticalRicciNumeratorline 1006 - def
OAI.HarmonicCounterexample.Berger.radialRicciNumeratorline 1008 - lemma
OAI.HarmonicCounterexample.Berger.normalTrace_identityline 1011 - lemma
OAI.HarmonicCounterexample.Berger.normalTraceD_identityline 1019 - lemma
OAI.HarmonicCounterexample.Berger.normalized_ricci_zeroline 1029 - lemma
OAI.HarmonicCounterexample.Berger.normalized_ricci_oneline 1042 - lemma
OAI.HarmonicCounterexample.Berger.normalized_ricci_twoline 1061 - theorem
OAI.HarmonicCounterexample.Berger.ricci_normalizedline 1099Source documentation
Exact Cartesian Ricci coefficients for the Berger metric, in logarithmic radial variables. All curvature operations use the frozen coordinate formula.
theorem ricci_normalized (g : SmoothMetric n) (J : ComplexStructure (Fin n)) {A q u v : Space n → ℝ} {x : Space n} {ud vd : ℝ} (hΓ : ∀ᶠ y in 𝓝 x, ∀ k i j, christoffel g y k i j = normalizedConnectionCoeff J y (A y) (q y) (u y) (v y) k i j) (hS : x ⬝ᵥ x ≠ 0) (hA : DifferentiableAt ℝ A x) (hq : DifferentiableAt ℝ q x) (hu : DifferentiableAt ℝ u x) (hv : DifferentiableAt ℝ v x) (hdA : ∀ i, coordDeriv i A x = (2*A x*u x)/(x ⬝ᵥ x)*x i) (hdq : ∀ i, coordDeriv i q x = (2*q x*v x)/(x ⬝ᵥ x)*x i) (hdu : ∀ i, coordDeriv i u x = ud/(x ⬝ᵥ x)*x i) (hdv : ∀ i, coordDeriv i v x = vd/(x ⬝ᵥ x)*x i) (i j : Fin n) : …Mentions: OAI.HarmonicCounterexample.SmoothMetric, OAI.HarmonicCounterexample.Berger.ComplexStructure, OAI.HarmonicCounterexample.Space, OAI.HarmonicCounterexample.christoffel, OAI.HarmonicCounterexample.Berger.normalizedConnectionCoeff, OAI.HarmonicCounterexample.coordDeriv
- lemma
OAI.HarmonicCounterexample.Cartesian.coordDeriv_logRadiusline 1167 - lemma
OAI.HarmonicCounterexample.Cartesian.coordDeriv_logProfileline 1177 - lemma
OAI.HarmonicCounterexample.Cartesian.tensor_eq_rawPolarline 1184 - theorem
OAI.HarmonicCounterexample.Cartesian.christoffel_logProfilesline 1197Source documentation
Produces the actual Levi-Civita connection for logarithmic profiles, locally in a fixed complex label (round gaps can use any label).
theorem christoffel_logProfiles (g : SmoothMetric n) (J : ComplexStructure (Fin n)) {A q u v : ℝ → ℝ} {x : Space n} (hx : x ≠ 0) (hg : ∀ᶠ y in 𝓝 x, g.coeff y = tensor (radialUnit y) (hopfUnit J y) (A (logRadius y)) (q (logRadius y))) (hA : HasDerivAt A (2*A (logRadius x)*u (logRadius x)) (logRadius x)) (hq : HasDerivAt q (2*q (logRadius x)*v (logRadius x)) (logRadius x)) (hA0 : A (logRadius x) ≠ 0) (hq0 : q (logRadius x) ≠ 0) (k i j : Fin n) : christoffel g x k i j = normalizedConnectionCoeff J x (A (logRadius x)) (q (logRadius x)) (u (logRadius x)) (v (logRadius x)) k i j := by …Mentions: OAI.HarmonicCounterexample.SmoothMetric, OAI.HarmonicCounterexample.Space, OAI.HarmonicCounterexample.Cartesian.radialUnit, OAI.HarmonicCounterexample.Cartesian.hopfUnit, OAI.HarmonicCounterexample.Cartesian.logRadius, OAI.HarmonicCounterexample.christoffel
- theorem
OAI.HarmonicCounterexample.Cartesian.ricci_logProfilesline 1224Source documentation
Full Ricci formula from the Cartesian definition for a locally fixed Berger label. It includes radial, Hopf and horizontal curvature with mixed terms zero.
theorem ricci_logProfiles (g : SmoothMetric n) (J : ComplexStructure (Fin n)) {A q u v : ℝ → ℝ} {x : Space n} {ud vd : ℝ} (hx : x ≠ 0) (hg : ∀ᶠ y in 𝓝 x, g.coeff y = tensor (radialUnit y) (hopfUnit J y) (A (logRadius y)) (q (logRadius y))) (hA : ∀ t, HasDerivAt A (2*A t*u t) t) (hq : ∀ t, HasDerivAt q (2*q t*v t) t) (hA0 : ∀ t, A t ≠ 0) (hq0 : ∀ t, q t ≠ 0) (hu : HasDerivAt u ud (logRadius x)) (hv : HasDerivAt v vd (logRadius x)) (i j : Fin n) : let t := logRadius x …Mentions: OAI.HarmonicCounterexample.SmoothMetric, OAI.HarmonicCounterexample.Space, OAI.HarmonicCounterexample.Cartesian.radialUnit, OAI.HarmonicCounterexample.Cartesian.hopfUnit, OAI.HarmonicCounterexample.Cartesian.logRadius
- lemma
OAI.HarmonicCounterexample.Berger.polar_quadraticline 1277 - lemma
OAI.HarmonicCounterexample.Berger.radialRicci_shapeline 1296 - lemma
OAI.HarmonicCounterexample.Berger.horizontalRicci_roundline 1303 - lemma
OAI.HarmonicCounterexample.Berger.verticalRicci_roundline 1309 - lemma
OAI.HarmonicCounterexample.Berger.roundRicci_nonnegativeline 1315 - lemma
OAI.HarmonicCounterexample.Cartesian.polarCoefficients_nonnegativeline 1353Source documentation
Eigenvalue positivity implies nonnegative Ricci as the frozen bilinear form, including all directions, not only radial or eigenvector test directions.
lemma polarCoefficients_nonnegative (J : ComplexStructure (Fin n)) {x : Space n} (hx : x ≠ 0) {H R V : ℝ} (hH : 0 ≤ H) (hR : 0 ≤ R) (hV : 0 ≤ V) (w : Space n) : 0 ≤ ∑ i, ∑ j, (H/(x ⬝ᵥ x)*(1:Mat n) i j+ (R-H)/(x ⬝ᵥ x)^2*x i*x j+ (V-H)/(x ⬝ᵥ x)^2*(J.matrix *ᵥ x) i*(J.matrix *ᵥ x) j)*w i*w j := by …Mentions: OAI.HarmonicCounterexample.Space, OAI.HarmonicCounterexample.Mat
- lemma
OAI.HarmonicCounterexample.Berger.radial_scalar_budgetline 1393