Encyclopedia Foundation Foundation Dalembert Fourth Gate D Alembert With Unit Calibration
ARTICLE 4 claims 4 theorems
Foundation Dalembert Fourth Gate D Alembert With Unit Calibration
A single functional equation, first studied by d'Alembert in the 1700s, has exactly one smooth solution under a unit calibration, and the Recognition Science library proves it in machine-checked form.
The d'Alembert equation and its unique solution
The d'Alembert functional equation, f(x+y) + f(x-y) = 2f(x)f(y), is a classical object in mathematics. Jean le Rond d'Alembert studied it in the 18th century. Its continuous solutions are exactly the hyperbolic cosine functions cosh(λx) for any real λ. This means the equation alone does not pick a single function; it allows a whole family, one for each value of the scaling parameter λ.
What selects a unique member of that family is a calibration condition. If a function H is twice continuously differentiable, satisfies the d'Alembert equation, has H(0)=1, H'(0)=0, and its second derivative at zero equals 1, then H must be exactly cosh(t). The theorem named dAlembert_with_unit_calibration in the framework's machine-checked library of formal theorems states precisely this. It proves that the unit calibration H''(0)=1 forces the λ=1 case, eliminating all other scalings.
In Recognition Science, this result serves as the Fourth Gate in a chain that derives the cost function J(x) = (x + 1/x)/2 - 1. The framework models recognition costs as functions on positive reals, and the shifted log-lift H(t) = F(e^t) + 1 is required to satisfy d'Alembert. The unit calibration is not an extra assumption; it follows from earlier gates. The theorem dAlembert_forces_Gcosh shows that with d'Alembert structure, smoothness, evenness, and the unit calibration, the underlying function G must equal cosh(t) - 1.
The declaration also participates in a contrast. A quadratic candidate, H(t) = t²/2 + 1, fails the d'Alembert equation, and the library proves this in Hquad_not_dAlembert. The summary theorem fourth_gate_summary packages both facts: the true cost Jcost satisfies the d'Alembert structure, and the quadratic counterexample does not. This separation is what makes the gate a genuine filter rather than a formality.
What the declaration does not claim is broader than what it proves. It does not establish the full forcing chain from recognition axioms to Jcost; that requires additional structural premises like symmetry and normalization, which appear in the separate theorem dAlembert_forces_Jcost. It does not prove the general classification for arbitrary λ, which remains a paper-level derivation. The unit calibration itself is not derived within this declaration; it is a premise taken as given, though the framework derives it elsewhere in the chain.
THEOREM dAlembert_with_unit_calibration · IndisputableMonolith/Foundation/DAlembert/FourthGate.lean
/-- **Corollary**: With calibration H''(0) = 1, we get H = cosh.
Proof: dalembert_deriv_ode gives H''(t) = H''(0)·H(t); substituting H''(0) = 1
gives H'' = H; ODE uniqueness (H(0)=1, H'(0)=0) then forces H = cosh. -/
theorem dAlembert_with_unit_calibration (H : ℝ → ℝ)
(hDA : SatisfiesDAlembert H)
(hSmooth : ContDiff ℝ 2 H)
(hDeriv0 : deriv H 0 = 0)
(hCalib : deriv (deriv H) 0 = 1) :
∀ t, H t = Real.cosh t := by
-- Step 1: H''(t) = H''(0) · H(t) from d'Alembert + C²
have hode_gen : ∀ x, deriv (deriv H) x = deriv (deriv H) 0 * H x :=
dalembert_deriv_ode H hSmooth hDA.2
-- Step 2: Substitute H''(0) = 1 to get the canonical ODE H'' = H
have hode : ∀ t, deriv (deriv H) t = H t := fun t => by
rw [hode_gen t, hCalib, one_mul]
-- Step 3: H(0) = 1 (from SatisfiesDAlembert)
have hH0 : H 0 = 1 := hDA.1
-- Step 4: ODE uniqueness — the unique C² solution to H'' = H, H(0) = 1, H'(0) = 0 is cosh
exact Cost.FunctionalEquation.ode_cosh_uniqueness_contdiff H hSmooth hode hH0 hDeriv0
THEOREM dAlembert_forces_Gcosh · IndisputableMonolith/Foundation/DAlembert/FourthGate.lean
/-- d'Alembert structure + calibration forces G = cosh - 1. -/
theorem dAlembert_forces_Gcosh (G : ℝ → ℝ)
(hDA : SatisfiesDAlembert (fun t => G t + 1))
(hSmooth : ContDiff ℝ 2 G)
(_ : G 0 = 0)
(hEven : ∀ t, G (-t) = G t)
(hCalib : deriv (deriv G) 0 = 1) :
∀ t, G t = Real.cosh t - 1 := by
let H := fun t => G t + 1
have hHsmooth : ContDiff ℝ 2 H := hSmooth.add contDiff_const
have hHderiv0 : deriv H 0 = 0 := by
have hderivH : deriv H = deriv G := by ext t; simp [H, deriv_add_const]
rw [hderivH]
have hGeven : (fun t => G (-t)) = G := funext hEven
have hcomp : deriv (fun t => G (-t)) 0 = deriv G 0 := by simp only [hGeven]
have hchain : deriv (fun t => G (-t)) 0 = -(deriv G 0) := by
have heq : (fun t => G (-t)) = G ∘ (fun t => -t) := rfl
rw [heq]
have hGdiff : DifferentiableAt ℝ G 0 := hSmooth.differentiable (by norm_num) |>.differentiableAt
rw [deriv_comp (0 : ℝ) (by simp only [neg_zero]; exact hGdiff) differentiable_neg.differentiableAt]
simp only [neg_zero, deriv_neg', mul_neg_one]
rw [hchain] at hcomp
linarith
have hHcalib : deriv (deriv H) 0 = 1 := by
have h1 : deriv H = deriv G := by ext t; simp [H, deriv_add_const]
have h2 : deriv (deriv H) = deriv (deriv G) := by simp [h1]
rw [h2, hCalib]
have hHcosh := dAlembert_with_unit_calibration H hDA hHsmooth hHderiv0 hHcalib
intro t
have := hHcosh t
simp only [H] at this
linarith
THEOREM Hquad_not_dAlembert · IndisputableMonolith/Foundation/DAlembert/FourthGate.lean
/-- The quadratic log-lift H(t) = t²/2 + 1 does NOT satisfy d'Alembert. -/
theorem Hquad_not_dAlembert : ¬ SatisfiesDAlembert (fun t => t^2/2 + 1) := by
intro ⟨_, hda⟩
have h11 := hda 1 1
norm_num at h11
THEOREM fourth_gate_summary · IndisputableMonolith/Foundation/DAlembert/FourthGate.lean
/-- **Fourth Gate Theorem**: Jcost satisfies d'Alembert structure; Fquad does not. -/
theorem fourth_gate_summary :
HasDAlembert Cost.Jcost ∧
¬ HasDAlembert Counterexamples.Fquad :=
⟨Jcost_has_dAlembert_structure, Fquad_not_dAlembert_structure⟩
What this page does not claim
The declaration does not prove the full forcing chain from recognition axioms to Jcost. The declaration does not derive the unit calibration; it takes it as a premise. The general classification for arbitrary λ is not formalized in this declaration.
Verify this page
Every tagged claim above names its theorem. To check one yourself rather than trust this page, elaborate the source module with Lean 4 and audit its axiom basis:
$ lake env lean IndisputableMonolith/Foundation/DAlembert/FourthGate.lean
expected axiom basis: [propext, Classical.choice, Quot.sound] (the Lean kernel's standard three; no RS-specific axioms)
A page whose claims cannot be reproduced this way does not ship. In production, every anchor links to the exact declaration in the public source release, and this block carries the build receipt for the page itself.
Derived articles
This page is generated by a question-recursion engine: the questions its answers raise become the next pages. The current agenda, with open targets marked red:
- How does the framework derive the unit calibration H''(0)=1 from earlier gates?
- What are the full structural premises in dAlembert_forces_Jcost that turn the d'Alembert structure into the cost function J?
- What is the paper-level scaling argument that generalizes the λ=1 case to arbitrary λ?
- Why does the quadratic log-lift fail the d'Alembert equation, and what does that failure reveal about the gate's filtering power?
MACHINE LAYER · GROUNDED CLAIM TABLE · CLICK TO EXPAND
THEOREM dAlembert_with_unit_calibration · IndisputableMonolith/Foundation/DAlembert/FourthGate.lean
/-- **Corollary**: With calibration H''(0) = 1, we get H = cosh. Proof: dalembert_deriv_ode gives H''(t) = H''(0)·H(t); substituting H''(0) = 1 gives H'' = H; ODE uniqueness (H(0)=1, H'(0)=0) then forces H = cosh. -/ theorem dAlembert_with_unit_calibration (H : ℝ → ℝ) (hDA : SatisfiesDAlembert H) (hSmooth : ContDiff ℝ 2 H) (hDeriv0 : deriv H 0 = 0) (hCalib : deriv (deriv H) 0 = 1) : ∀ t, H t = Real.cosh t := by -- Step 1: H''(t) = H''(0) · H(t) from d'Alembert + C² have hode_gen : ∀ x, deriv (deriv H) x = deriv (deriv H) 0 * H x := dalembert_deriv_ode H hSmooth hDA.2 -- Step 2: Substitute H''(0) = 1 to get the canonical ODE H'' = H have hode : ∀ t, deriv (deriv H) t = H t := fun t => by rw [hode_gen t, hCalib, one_mul] -- Step 3: H(0) = 1 (from SatisfiesDAlembert) have hH0 : H 0 = 1 := hDA.1 -- Step 4: ODE uniqueness — the unique C² solution to H'' = H, H(0) = 1, H'(0) = 0 is cosh exact Cost.FunctionalEquation.ode_cosh_uniqueness_contdiff H hSmooth hode hH0 hDeriv0If a function H is twice continuously differentiable, satisfies the d'Alembert equation, has H(0)=1, H'(0)=0, and its second derivative at zero equals 1, then H must be exactly cosh(t). dAlembert_with_unit_calibration · IndisputableMonolith/Foundation/DAlembert/FourthGate.leanTHEOREM dAlembert_forces_Gcosh · IndisputableMonolith/Foundation/DAlembert/FourthGate.lean
/-- d'Alembert structure + calibration forces G = cosh - 1. -/ theorem dAlembert_forces_Gcosh (G : ℝ → ℝ) (hDA : SatisfiesDAlembert (fun t => G t + 1)) (hSmooth : ContDiff ℝ 2 G) (_ : G 0 = 0) (hEven : ∀ t, G (-t) = G t) (hCalib : deriv (deriv G) 0 = 1) : ∀ t, G t = Real.cosh t - 1 := by let H := fun t => G t + 1 have hHsmooth : ContDiff ℝ 2 H := hSmooth.add contDiff_const have hHderiv0 : deriv H 0 = 0 := by have hderivH : deriv H = deriv G := by ext t; simp [H, deriv_add_const] rw [hderivH] have hGeven : (fun t => G (-t)) = G := funext hEven have hcomp : deriv (fun t => G (-t)) 0 = deriv G 0 := by simp only [hGeven] have hchain : deriv (fun t => G (-t)) 0 = -(deriv G 0) := by have heq : (fun t => G (-t)) = G ∘ (fun t => -t) := rfl rw [heq] have hGdiff : DifferentiableAt ℝ G 0 := hSmooth.differentiable (by norm_num) |>.differentiableAt rw [deriv_comp (0 : ℝ) (by simp only [neg_zero]; exact hGdiff) differentiable_neg.differentiableAt] simp only [neg_zero, deriv_neg', mul_neg_one] rw [hchain] at hcomp linarith have hHcalib : deriv (deriv H) 0 = 1 := by have h1 : deriv H = deriv G := by ext t; simp [H, deriv_add_const] have h2 : deriv (deriv H) = deriv (deriv G) := by simp [h1] rw [h2, hCalib] have hHcosh := dAlembert_with_unit_calibration H hDA hHsmooth hHderiv0 hHcalib intro t have := hHcosh t simp only [H] at this linarithThe theorem dAlembert_forces_Gcosh shows that with d'Alembert structure, smoothness, evenness, and the unit calibration, the underlying function G must equal cosh(t) - 1. dAlembert_forces_Gcosh · IndisputableMonolith/Foundation/DAlembert/FourthGate.leanTHEOREM Hquad_not_dAlembert · IndisputableMonolith/Foundation/DAlembert/FourthGate.lean
/-- The quadratic log-lift H(t) = t²/2 + 1 does NOT satisfy d'Alembert. -/ theorem Hquad_not_dAlembert : ¬ SatisfiesDAlembert (fun t => t^2/2 + 1) := by intro ⟨_, hda⟩ have h11 := hda 1 1 norm_num at h11A quadratic candidate, H(t) = t²/2 + 1, fails the d'Alembert equation, and the library proves this in Hquad_not_dAlembert. Hquad_not_dAlembert · IndisputableMonolith/Foundation/DAlembert/FourthGate.leanTHEOREM fourth_gate_summary · IndisputableMonolith/Foundation/DAlembert/FourthGate.lean
/-- **Fourth Gate Theorem**: Jcost satisfies d'Alembert structure; Fquad does not. -/ theorem fourth_gate_summary : HasDAlembert Cost.Jcost ∧ ¬ HasDAlembert Counterexamples.Fquad := ⟨Jcost_has_dAlembert_structure, Fquad_not_dAlembert_structure⟩The summary theorem fourth_gate_summary packages both facts: the true cost Jcost satisfies the d'Alembert structure, and the quadratic counterexample does not. fourth_gate_summary · IndisputableMonolith/Foundation/DAlembert/FourthGate.lean