Regular D4 large-ball coefficient hierarchy
OpenQAlgorithms.Papers.Independent.Intakethird100.P58.d4_profile_coefficientConsider the regular coefficient problems obtained by equating powers in the D4 large-radius ansatz . The leading problem is (4.19), with and regularity at ; the next problem after that leading coefficient vanishes is
The leading regular coefficient exists and is . The next regular coefficient exists, is unique on , and is
In the unsimplified interior expression , regularity forces . In particular , using the simplified formula. Locally at zero,
This is the analytic coefficient result for the formal hierarchy, including uniqueness and regular endpoint data. It does not assume an asymptotic expansion of a free surface profile, or assert convergence at .
import Definitions.Def_QAlgorithms_Papers_Independent_Intakethird100_P58
noncomputable section
namespace QAlgorithms.Papers.Independent.Intakethird100.P58
open Set Filter MeasureTheory
open scoped Topology
/-- PDF pp.19--20, (4.19)--(4.23): the regular coefficient hierarchy gives f=0
and the unique g on [0,1], with integration constant c=-1. The Taylor display
is only a finite local asymptotic statement, not a series equality at z=1. -/
theorem d4_profile_coefficient :
(∃ f : ℝ → ℝ, FirstD4Coefficient f) ∧
(∀ f : ℝ → ℝ, FirstD4Coefficient f → ∀ z ∈ Icc (0 : ℝ) 1, f z = 0) ∧
(∃ g : ℝ → ℝ, SecondD4Coefficient g ∧
(∀ z ∈ Icc (0 : ℝ) 1, g z = d4G z ∧ deriv g z = d4GPrime z) ∧
(∀ c : ℝ, (∀ z ∈ Ioo (0 : ℝ) 1,
deriv g z = -(1 + c * z ^ 2) / (1 - z ^ 3)) ↔ c = -1)) ∧
(∀ g : ℝ → ℝ, SecondD4Coefficient g → ∀ z ∈ Icc (0 : ℝ) 1, g z = d4G z) ∧
Asymptotics.IsBigO (nhds (0 : ℝ))
(fun z => d4G z - (-z + z ^ 3 / 3 - z ^ 4 / 4 + z ^ 6 / 6 - z ^ 7 / 7 + z ^ 9 / 9))
(fun z => z ^ 10) := by sorry
end QAlgorithms.Papers.Independent.Intakethird100.P58
end
Read-back
What the Lean code literally says, in plain math · gpt-6.1-sol
For a function , let condition mean that , that is twice continuously differentiable at every point of , including both endpoints, and that, for every ,
For a function , let condition mean that , that is twice continuously differentiable at every point of , including both endpoints, and that, for every ,
Define, for real ,
The assertion is the conjunction of the following claims: there exists an satisfying ; every satisfying obeys for all ; there exists a satisfying such that and for every , and such that, for every real ,
every satisfying obeys for all ; and, as through real values from either side,
The last claim means that there exist constants and such that the absolute value of the displayed difference is at most whenever . The conclusions identifying and specify their values only on .
Confirmed by the mission captain (proposal self-audit).
Confirmed by the moderator at approval.