Integrated directed estimate combining coercive and elliptic regions
ProvedOAI.SmoothLocal.Flow.actual_cap_integrated_overlap_estimateNotation. is the model square; a metric is a smooth positive matrix field ; is a scalar height; is its covariant Hessian; is the Gaussian curvature; ; is the Hessian quotient; is the model curvature; the patch box and the central box are the squares and ; the sheared coordinates are , with sheared height ; and are the class width and speed of (4.2); is the test metric (4.12) built from ; a bounded admissible height of bound is an admissible height with (4.1).
Let be smooth with on the chart domain, , with as before. Let , , and let satisfy the listed budgets, with pointwise coercivity of the multiplier form with constant on the part of the integration region. With the distance bound and the primitive of ,
integrals taken over the enlarged rectangle up to , where and are explicit budgets for the overlap and elliptic parts.
Formalization Note. This is the upstream Lean declaration OAI.SmoothLocal.Flow.actual_cap_integrated_overlap_estimate in lean/OAI/Geometry/IsometricImmersion/Caps/IntegratedCapOverlap.lean, stated verbatim; the Lean statement is authoritative for the precise hypotheses. It is an intermediate result of OpenAI's formalization.
import Mathlib import Definitions.Def_IsometricImmersion import Definitions.Def_SmoothLocalIsometricSupport namespace OAI noncomputable section open Set Filter open scoped ContDiff Topology namespace SmoothLocal.Weighted open SmoothLocal.Geometry end SmoothLocal.Weighted namespace SmoothLocal.Flow open SmoothLocal.Geometry SmoothLocal.Weighted SmoothLocal.Model
theorem actual_cap_integrated_overlap_estimate
{g0 eta : MetricField} {U : Set Coord} {Y : ℝ → ℝ → ℝ}
{L R A0 b kappa c1 c2 glow lambda epsilon MI M MK : ℝ}
{G1 B C I u f : Coord → ℝ}
(hL : -2 < L) (hR : R < 2) (hA0 : -2 < A0) (hAb : A0 ≤ b) (hb : b ≤ 0)
(hk : 0 < kappa) (hc1 : 0 < c1) (hc2 : 0 < c2) (hg : 0 < glow)
(hM : 0 ≤ M) (hMK : 0 ≤ MK) (hlambda : 0 ≤ lambda)
(heps : 0 ≤ epsilon) (heps1 : epsilon ≤ 1)
(hK : ContDiffOn ℝ ∞ (capPullback Y (gaussianCurvature (g0+eta))) capChartDomain)
(hG1 : ContDiffOn ℝ ∞ G1 capChartDomain) (hB : ContDiffOn ℝ ∞ B capChartDomain)
(hC : ContDiffOn ℝ ∞ C capChartDomain) (hI : ContDiffOn ℝ ∞ I capChartDomain)
(hu : ContDiffOn ℝ ∞ u capChartDomain)
(hEq : ∀ p ∈ capChartDomain,
multiplierOperator (fun q => G1 q*capPullback Y (gaussianCurvature (g0+eta)) q) B C u p = f p)
(hbackground : ∀ q ∈ U, gaussianCurvature g0 q = modelCurvature kappa q)
(hsupport : tsupport eta ⊆ patchBox)
(himage : ∀ p ∈ closedRectangle (capOuterLeft L) (capOuterRight R) (capOuterBottom A0) b,
capChart Y p ∈ U)
(hdisp : ∀ p ∈ closedRectangle (capOuterLeft L) (capOuterRight R) (capOuterBottom A0) b,
|capFlowHeight Y p-p 1| ≤ (1 : ℝ)/50)
(hIv : ∀ p ∈ closedRectangle (capOuterLeft L) (capOuterRight R) (capOuterBottom A0) b, |I p| ≤ MI)
(hIi : ∀ p ∈ closedRectangle (capOuterLeft L) (capOuterRight R) (capOuterBottom A0) b,
∀ i : Fin 2, |coordPartial i I p| ≤ M)
(hGlow : ∀ p ∈ closedRectangle (capOuterLeft L) (capOuterRight R) (capOuterBottom A0) b, glow ≤ G1 p)
(hAv : ∀ p ∈ closedRectangle (capOuterLeft L) (capOuterRight R) (capOuterBottom A0) b,
|G1 p*capPullback Y (gaussianCurvature (g0+eta)) p| ≤ M)
(hAi : ∀ p ∈ closedRectangle (capOuterLeft L) (capOuterRight R) (capOuterBottom A0) b,
∀ i : Fin 2, |coordPartial i (fun q => G1 q*capPullback Y (gaussianCurvature (g0+eta)) q) p| ≤ M)
(hBv : ∀ p ∈ closedRectangle (capOuterLeft L) (capOuterRight R) (capOuterBottom A0) b, |B p| ≤ M)
(hCv : ∀ p ∈ closedRectangle (capOuterLeft L) (capOuterRight R) (capOuterBottom A0) b, |C p| ≤ M)
(hKi : ∀ p ∈ closedRectangle (capOuterLeft L) (capOuterRight R) (capOuterBottom A0) b,
∀ i : Fin 2, |coordPartial i (capPullback Y (gaussianCurvature (g0+eta))) p| ≤ MK)
(hcoercive : ∀ p ∈ closedRectangle (capOuterLeft L) (capOuterRight R) (capOuterBottom A0) b,
capPullback Y (gaussianCurvature (g0+eta)) p ≤ c1*edgeDistance b p →
c2*directedWeight b lambda I p*((coordPartial 0 u p)^2+(coordPartial 1 u p)^2) ≤
multiplierQuadratic (fun q => G1 q*capPullback Y (gaussianCurvature (g0+eta)) q) B C
(directedM b lambda I) (directedN b lambda epsilon I) u p) :
let D := capDistanceBound A0 b
let COverlap := capOverlapEnergyCost L R A0 b kappa c1 c2 glow M lambda MI
let HElliptic := capEllipticRatioBudget L R A0 b kappa c1 glow MK M
(c2/2)*rectangleIntegral (capOuterLeft L) (capOuterRight R) (capOuterBottom A0) b
(directedGradientEnergy (capSpatialCutoff L R A0) I u b lambda) ≤
((5/(2*c2))*(D^8*Real.exp (lambda*2+MI))+COverlap*D^6)*
rectangleIntegral (capOuterLeft L) (capOuterRight R) (capOuterBottom A0) b (fun p => (f p)^2) +
(COverlap*(D^6+HElliptic))*
rectangleIntegral (capOuterLeft L) (capOuterRight R) (capOuterBottom A0) b (fun p => (u p)^2) := by
sorry
end SmoothLocal.Flow
end
end OAI