All-order Cauchy data bounds at the upper pulse edge
ProvedOAI.SmoothLocal.Perturbation.exists_actual_upper_off_pulse_cauchy_bounds_at_radiusNotation. 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).
With , as above and an order , there is such that for all and and all sufficiently large : for every patch perturbation and bounded admissible height of bound for , where has the model curvature on an open , has bound , , and is within in of the test metric, one has for , ,
This is the upper-edge assertion of Lemma 4.1, obtained from the upper cap.
Formalization Note. This is the upstream Lean declaration OAI.SmoothLocal.Perturbation.exists_actual_upper_off_pulse_cauchy_bounds_at_radius in lean/OAI/Geometry/IsometricImmersion/Caps/ActualUpperOffPulseCauchy.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 Function open scoped ContDiff Topology Matrix namespace SmoothLocal.Perturbation open SmoothLocal.Geometry SmoothLocal.Pulse SmoothLocal.HighEquation SmoothLocal.Flow open SmoothLocal.Flow.Reflection SmoothLocal.ODE SmoothLocal.Weighted SmoothLocal.Taylor open SmoothLocal.Model
theorem exists_actual_upper_off_pulse_cauchy_bounds_at_radius
{gStar : MetricField} {V : Set Coord}
(hgStar : SmoothPositiveOn gStar V) (hV : IsOpen V) (hSV : modelSquare ⊆ V)
{G d kappa q0 r : ℝ} (M : ℕ) (hG : 0 ≤ G) (hd : 0 < d)
(hkappa : 0 < kappa) (hM : 0 < M) (hq0 : |q0| ≤ 1/20)
(hr : 0 < r) (hrhalf : r < 1/2) (hLr : boundedClassWidth kappa M*r ≤ 1/20)
(hrsmall : heightQuotientJetBound G (M : ℝ) d (1/(M : ℝ))*
(r+107*(boundedClassWidth kappa M*r)/100) ≤ 9/(100*boundedClassWidth kappa M))
(K : ℕ) :
∃ B : ℝ, 0 ≤ B ∧ ∀ N : ℕ, ∀ delta : ℝ, 0 < delta →
∀ᶠ tau : ℕ in atTop,
∀ (g0 : MetricField) (eta : metricPatchSet g0 kappa) (U : Set Coord) (z : Coord → ℝ),
SmoothPositiveOn g0 U → SmoothPositiveOn (perturbedMetric g0 eta.val) U →
IsOpen U → modelSquare ⊆ U →
(∀ p ∈ U, gaussianCurvature g0 p = modelCurvature kappa p) →
CapInductionHeight (perturbedMetric g0 eta.val) U (M : ℝ) (1/(M : ℝ)) (1/(M : ℝ)) z →
BoundedAdmissibleHeight (perturbedMetric g0 eta.val) M z →
(∀ i j k, k ≤ 8 → ∀ p ∈ modelSquare,
‖iteratedFDeriv ℝ k (fun a => perturbedMetric g0 eta.val a i j) p‖ ≤ G) →
(∀ p ∈ modelSquare, d ≤ |(perturbedMetric g0 eta.val p).det|) →
|hessianQuotient (perturbedMetric g0 eta.val) z 0-q0| ≤ 1/(100*boundedClassWidth kappa M) →
(∀ i j : Fin 2, ∀ k ≤ tau, ∀ p ∈ modelSquare,
‖iteratedFDeriv ℝ k (fun q => perturbedMetric g0 eta.val q i j-
testMetric gStar q0 (boundedClassWidth kappa M*r/16) N delta (tau : ℝ) q i j) p‖ ≤
metricApproximationAccuracy tau) →
∀ x : ℝ, |x| ≤ boundedClassWidth kappa M*r/2 → ∀ n ≤ K,
‖iteratedFDeriv ℝ n (heightCauchyValue (heightInShearCoordinates z q0)
(delta/(tau : ℝ))) x‖ ≤ B ∧
‖iteratedFDeriv ℝ n (heightCauchyVelocity (heightInShearCoordinates z q0)
(delta/(tau : ℝ))) x‖ ≤ B := by
sorry
end SmoothLocal.Perturbation
end
end OAI