Actual PBPS harmonic flow and conserved weighted energy
AutoSamplingTheory.ExampleCases.ProximalBPS.ActualHarmonicFlow.actual_harmonic_flow_laws · theorem · Teaching coverage
Mathematical statement
Let E be a finite-dimensional real inner-product Borel space, including rank zero. Let V:E→ℝ be C² on all E, let α,β≥0 satisfy 0<α≤β and α‖v‖²≤D²V(x)[v,v]≤β‖v‖² for all x,v∈E, and assume η>0 and βη≤1. For every y,xRef∈E set c=y−η∇V(xRef), and for t∈ℝ, z=(x,p)∈E×E define Φ_t(z)=(c+cos(t)(x−c)+√η sin(t)p,−sin(t)(x−c)/√η+cos(t)p) and H(z)=(η⁻¹‖x−c‖²+‖p‖²)/2. Then (1) the map (y,xRef,t,z)↦Φ_t(z) is jointly continuous on (E×E)×ℝ×(E×E); (2) it is jointly Borel measurable; (3) Φ_0(z)=z; (4) Φ_{s+t}(z)=Φ_s(Φ_t(z)) for all real s,t; (5) Φ_{−t}(Φ_t(z))=Φ_t(Φ_{−t}(z))=z; (6) writing (X_t,P_t)=Φ_t(z), both time derivatives exist at every real t and satisfy dX_t/dt=√η P_t and dP_t/dt=−(X_t−y)/√η−√η∇V(xRef); (7) H(z)≥0; (8) H(Φ_t(z))=H(z); and (9) Φ_π(z)=(2c−x,−p). These conclusions quantify every displayed parameter and state. The original six source-standing callers persist; the deterministic calculation invokes C² through gradient continuity and η>0, while the two Hessian bounds, positive lower modulus and step cap are retained rather than used in its BODY. No energy positivity, positive dimension, strict endpoint or higher derivative assumption is added. This is the actual deterministic arc ingredient of the cited algorithm, with ASTIS supplying the omitted elementary continuity, group, differentiation and norm-cancellation bridges. It does not construct the stochastic trajectory, prove nonexplosion or identify an invariant/terminal sampling law.
Lean statement · actual_harmonic_flow_laws
Let E be a finite-dimensional real inner-product Borel space, including rank zero. Let V:E→ℝ be C² on all E, let α,β≥0 satisfy 0<α≤β and α‖v‖²≤D²V(x)[v,v]≤β‖v‖² for all x,v∈E, and assume η>0 and βη≤1. For every y,xRef∈E set c=y−η∇V(xRef), and for t∈ℝ, z=(x,p)∈E×E define Φ_t(z)=(c+cos(t)(x−c)+√η sin(t)p,−sin(t)(x−c)/√η+cos(t)p) and H(z)=(η⁻¹‖x−c‖²+‖p‖²)/2. Then (1) the map (y,xRef,t,z)↦Φ_t(z) is jointly continuous on (E×E)×ℝ×(E×E); (2) it is jointly Borel measurable; (3) Φ_0(z)=z; (4) Φ_{s+t}(z)=Φ_s(Φ_t(z)) for all real s,t; (5) Φ_{−t}(Φ_t(z))=Φ_t(Φ_{−t}(z))=z; (6) writing (X_t,P_t)=Φ_t(z), both time derivatives exist at every real t and satisfy dX_t/dt=√η P_t and dP_t/dt=−(X_t−y)/√η−√η∇V(xRef); (7) H(z)≥0; (8) H(Φ_t(z))=H(z); and (9) Φ_π(z)=(2c−x,−p). These conclusions quantify every displayed parameter and state. The original six source-standing callers persist; the deterministic calculation invokes C² through gradient continuity and η>0, while the two Hessian bounds, positive lower modulus and step cap are retained rather than used in its BODY. No energy positivity, positive dimension, strict endpoint or higher derivative assumption is added. This is the actual deterministic arc ingredient of the cited algorithm, with ASTIS supplying the omitted elementary continuity, group, differentiation and norm-cancellation bridges. It does not construct the stochastic trajectory, prove nonexplosion or identify an invariant/terminal sampling law.
Braces mark parameters Lean can infer; square brackets request structures such as a measurable space or probability measure. Named hypotheses are mathematical premises, not facts established by this declaration. Section parameters are described in the mathematical hypotheses above; the module link retains their exact source context.
theorem actual_harmonic_flow_laws
{E : Type*} [NormedAddCommGroup E] [InnerProductSpace ℝ E]
[FiniteDimensional ℝ E] [MeasurableSpace E] [BorelSpace E]
{V : E → ℝ} {α β : ℝ≥0} {η : ℝ}
(hα : 0 < (α : ℝ)) (hαβ : α ≤ β) (hV : ContDiff ℝ 2 V)
(hH : ∀ x v : E,
(α : ℝ) * ‖v‖ ^ 2 ≤ (fderiv ℝ (fderiv ℝ V) x v) v ∧
(fderiv ℝ (fderiv ℝ V) x v) v ≤ (β : ℝ) * ‖v‖ ^ 2)
(hη : 0 < η) (hβη : (β : ℝ) * η ≤ 1) :
actual_harmonic_flow_statement hα hαβ hV hH hη hβηFull Lean proposition (definition) · actual_harmonic_flow_statement
This literal definition stores the complete proposition asserted above. It supplies no mathematical proof or additional hypothesis; the theorem proof must establish its value.
Braces mark parameters Lean can infer; square brackets request structures such as a measurable space or probability measure. Named hypotheses are mathematical premises, not facts established by this declaration. Section parameters are described in the mathematical hypotheses above; the module link retains their exact source context.
private def actual_harmonic_flow_statement
{E : Type*} [NormedAddCommGroup E] [InnerProductSpace ℝ E]
[FiniteDimensional ℝ E] [MeasurableSpace E] [BorelSpace E]
{V : E → ℝ} {α β : ℝ≥0} {η : ℝ}
(hα : 0 < (α : ℝ)) (hαβ : α ≤ β) (hV : ContDiff ℝ 2 V)
(hH : ∀ x v : E,
(α : ℝ) * ‖v‖ ^ 2 ≤ (fderiv ℝ (fderiv ℝ V) x v) v ∧
(fderiv ℝ (fderiv ℝ V) x v) v ≤ (β : ℝ) * ‖v‖ ^ 2)
(hη : 0 < η) (hβη : (β : ℝ) * η ≤ 1) : Prop :=
let c : E → E → E := fun y xRef => y - η • gradient V xRef
let Φ : E → E → ℝ → (E × E) → (E × E) := fun y xRef t z =>
(c y xRef + Real.cos t • (z.1 - c y xRef) +
(Real.sqrt η * Real.sin t) • z.2,
(-Real.sin t / Real.sqrt η) • (z.1 - c y xRef) + Real.cos t • z.2)
let H : E → E → (E × E) → ℝ := fun y xRef z =>
(η⁻¹ * ‖z.1 - c y xRef‖ ^ 2 + ‖z.2‖ ^ 2) / 2
Continuous (fun a : (E × E) × ℝ × (E × E) =>
Φ a.1.1 a.1.2 a.2.1 a.2.2) ∧
Measurable (fun a : (E × E) × ℝ × (E × E) =>
Φ a.1.1 a.1.2 a.2.1 a.2.2) ∧
(∀ y xRef : E, ∀ z : E × E, Φ y xRef 0 z = z) ∧
(∀ y xRef : E, ∀ s t : ℝ, ∀ z : E × E,
Φ y xRef (s + t) z = Φ y xRef s (Φ y xRef t z)) ∧
(∀ y xRef : E, ∀ t : ℝ, ∀ z : E × E,
Φ y xRef (-t) (Φ y xRef t z) = z ∧
Φ y xRef t (Φ y xRef (-t) z) = z) ∧
(∀ y xRef : E, ∀ t : ℝ, ∀ z : E × E,
HasDerivAt (fun s : ℝ => (Φ y xRef s z).1)
(Real.sqrt η • (Φ y xRef t z).2) t ∧
HasDerivAt (fun s : ℝ => (Φ y xRef s z).2)
(-(Real.sqrt η)⁻¹ • ((Φ y xRef t z).1 - y) -
Real.sqrt η • gradient V xRef) t) ∧
(∀ y xRef : E, ∀ z : E × E, 0 ≤ H y xRef z) ∧
(∀ y xRef : E, ∀ t : ℝ, ∀ z : E × E,
H y xRef (Φ y xRef t z) = H y xRef z) ∧
(∀ y xRef : E, ∀ z : E × E,
Φ y xRef Real.pi z = ((2 : ℝ) • c y xRef - z.1, -z.2))Proof roadmap
- 1Establish the scale and joint continuity
Since η>0, r=√η is positive, nonzero and r²=η. The canonical ASTIS gradient-continuity theorem applies to V∈C² after lowering its differentiability order to one. Hence c depends continuously on (y,xRef), and the displayed trigonometric and scalar operations make Φ jointly continuous in all four inputs. Joint Borel measurability follows for the actual product Borel spaces; it is used when reassembling the conclusions.
- 2Verify identity, group composition and inverse
At time zero the sine vanishes and cosine is one. Expanding Φ_s(Φ_tz), the cosine and sine addition formulas identify both coordinates with Φ_{s+t}z; division is legitimate because √η≠0. Taking s=−t or t=−s yields both inverse identities. All times are real, with no domain restriction.
- 3Differentiate the two actual coordinates
Differentiate the sine and cosine expressions while fixing y,xRef and the initial state. The position derivative is −sin(t)(x−c)+r cos(t)p=rP_t. For momentum, −cos(t)(x−c)/r−sin(t)p equals −(X_t−y)/r−r∇V(xRef), using c=y−η∇V(xRef) and r²=η. HasDerivAt.congr_deriv changes only the vector derivative expression; it supplies no ODE hypothesis.
- 4Keep the weighted energy nonnegative
Both squared norms are nonnegative. Since η>0, its inverse is nonnegative, and dividing their weighted sum by two preserves nonnegativity. Zero initial energy is included.
- 5Cancel the mixed terms in the conserved energy
Put q=x−c, C=cos t and S=sin t. Translate the first coordinate back by c and expand each individual squared norm. The mixed terms are +2CS⟨q,p⟩/r and −2CS⟨q,p⟩/r, which cancel. The remaining sum is (C²+S²)(r⁻²‖q‖²+‖p‖²). Using C²+S²=1 and r²=η gives H(Φ_tz)=H(z), with the exact factor one half retained.
- 6Evaluate the half-turn and collect the nine laws
At t=π, sin π=0 and cos π=−1, so X_π=c−(x−c)=2c−x and P_π=−p. Collect the continuity/Borel, initial, group, two inverse, ODE, nonnegative-energy, conservation and half-turn conclusions. This endpoint belongs to a deterministic arc only; stochastic bounces may change the eventual terminal law.
Full assumptions and notation
All objects and hypotheses
- E is a finite-dimensional real inner-product space with its norm and a measurable structure equal to its Borel structure. Rank zero is allowed; the product space uses its usual product structures.
- V:E→ℝ is twice continuously Frechet differentiable on all E. The nonnegative moduli α,β satisfy 0<α and α≤β, and α‖v‖²≤D²V(x)[v,v]≤β‖v‖² for every x,v∈E.
- The real step η satisfies η>0 and βη≤1. The endpoint αη=1 is allowed. The original six analytic callers are retained; only C² for gradient continuity and η>0 are invoked in this deterministic proof.
- The parameters y,xRef range independently over E, the time variable over all real numbers, and z=(x,p) over E×E. The gradient is the Hilbert gradient of V; c,Φ,H are the exact displayed definitions.
- H is a weighted SUM of the two individual squared vector norms, not the square of a product-space max norm. No nonzero energy, positive dimension, stochastic kernel, supplied flow certificate or higher derivative bound is assumed.
Mathematical proof
1. Establish the scale and joint continuity
Since η>0, r=√η is positive, nonzero and r²=η. The canonical ASTIS gradient-continuity theorem applies to V∈C² after lowering its differentiability order to one. Hence c depends continuously on (y,xRef), and the displayed trigonometric and scalar operations make Φ jointly continuous in all four inputs. Joint Borel measurability follows for the actual product Borel spaces; it is used when reassembling the conclusions.
Corresponding Lean step
have hr : 0 < Real.sqrt η := Real.sqrt_pos.2 hη
have hr0 : Real.sqrt η ≠ 0 := ne_of_gt hr
have hr2 : (Real.sqrt η) ^ 2 = η := Real.sq_sqrt hη.le
have hgrad : Continuous (fun x : E => gradient V x) :=
AutoSamplingTheory.TechnicalLemmas.Analysis.Calculus.Gradient.continuous_gradient_of_contDiff_one
(hV.of_le (by norm_num))
have hc : Continuous (fun a : E × E => c a.1 a.2) := by
dsimp [c]
fun_prop
have hcont : Continuous (fun a : (E × E) × ℝ × (E × E) =>
Φ a.1.1 a.1.2 a.2.1 a.2.2) := by
dsimp [Φ]
fun_prop
Exact compiled contiguous proof BODY; local literal c,Φ,H and preceding facts remain in scope.
2. Verify identity, group composition and inverse
At time zero the sine vanishes and cosine is one. Expanding Φ_s(Φ_tz), the cosine and sine addition formulas identify both coordinates with Φ_{s+t}z; division is legitimate because √η≠0. Taking s=−t or t=−s yields both inverse identities. All times are real, with no domain restriction.
Corresponding Lean step
have hzero (y xRef : E) (z : E × E) : Φ y xRef 0 z = z := by
apply Prod.ext <;> dsimp [Φ]
· simp only [Real.cos_zero, Real.sin_zero, one_smul, mul_zero, zero_smul, add_zero]
module
· simp
have hgroup (y xRef : E) (s t : ℝ) (z : E × E) :
Φ y xRef (s + t) z = Φ y xRef s (Φ y xRef t z) := by
apply Prod.ext <;> dsimp [Φ]
all_goals
rw [Real.cos_add, Real.sin_add]
match_scalars <;> (try field_simp [hr0]) <;> ring
have hinverse (y xRef : E) (t : ℝ) (z : E × E) :
Φ y xRef (-t) (Φ y xRef t z) = z ∧
Φ y xRef t (Φ y xRef (-t) z) = z := by
constructor
· rw [← hgroup, neg_add_cancel, hzero]
· rw [← hgroup, add_neg_cancel, hzero]
Exact compiled contiguous proof BODY; local literal c,Φ,H and preceding facts remain in scope.
3. Differentiate the two actual coordinates
Differentiate the sine and cosine expressions while fixing y,xRef and the initial state. The position derivative is −sin(t)(x−c)+r cos(t)p=rP_t. For momentum, −cos(t)(x−c)/r−sin(t)p equals −(X_t−y)/r−r∇V(xRef), using c=y−η∇V(xRef) and r²=η. HasDerivAt.congr_deriv changes only the vector derivative expression; it supplies no ODE hypothesis.
Corresponding Lean step
have hode (y xRef : E) (t : ℝ) (z : E × E) :
HasDerivAt (fun s : ℝ => (Φ y xRef s z).1)
(Real.sqrt η • (Φ y xRef t z).2) t ∧
HasDerivAt (fun s : ℝ => (Φ y xRef s z).2)
(-(Real.sqrt η)⁻¹ • ((Φ y xRef t z).1 - y) -
Real.sqrt η • gradient V xRef) t := by
constructor
· have hx := ((hasDerivAt_const t (c y xRef)).add
((Real.hasDerivAt_cos t).smul_const (z.1 - c y xRef))).add
(((Real.hasDerivAt_sin t).const_mul (Real.sqrt η)).smul_const z.2)
apply hx.congr_deriv
dsimp [Φ]
match_scalars <;> (try field_simp [hr0]) <;> ring
· have hp := (((Real.hasDerivAt_sin t).neg.div_const (Real.sqrt η)).smul_const
(z.1 - c y xRef)).add ((Real.hasDerivAt_cos t).smul_const z.2)
apply hp.congr_deriv
dsimp [Φ, c]
match_scalars <;> (try field_simp [hr0]) <;> nlinarith only [hr2]
Exact compiled contiguous proof BODY; local literal c,Φ,H and preceding facts remain in scope.
4. Keep the weighted energy nonnegative
Both squared norms are nonnegative. Since η>0, its inverse is nonnegative, and dividing their weighted sum by two preserves nonnegativity. Zero initial energy is included.
Corresponding Lean step
have hnonneg (y xRef : E) (z : E × E) : 0 ≤ H y xRef z := by
exact div_nonneg (add_nonneg (mul_nonneg (inv_nonneg.2 hη.le) (sq_nonneg _))
(sq_nonneg _)) (by norm_num)
Exact compiled contiguous proof BODY; local literal c,Φ,H and preceding facts remain in scope.
5. Cancel the mixed terms in the conserved energy
Put q=x−c, C=cos t and S=sin t. Translate the first coordinate back by c and expand each individual squared norm. The mixed terms are +2CS⟨q,p⟩/r and −2CS⟨q,p⟩/r, which cancel. The remaining sum is (C²+S²)(r⁻²‖q‖²+‖p‖²). Using C²+S²=1 and r²=η gives H(Φ_tz)=H(z), with the exact factor one half retained.
Corresponding Lean step
have henergy (y xRef : E) (t : ℝ) (z : E × E) :
H y xRef (Φ y xRef t z) = H y xRef z := by
have hcenter : (Φ y xRef t z).1 - c y xRef =
Real.cos t • (z.1 - c y xRef) + (Real.sqrt η * Real.sin t) • z.2 := by
dsimp [Φ]
module
dsimp only [H]
rw [hcenter]
dsimp only [Φ]
congr 1
rw [norm_add_sq_real, norm_add_sq_real]
simp only [norm_smul, Real.norm_eq_abs, mul_pow, sq_abs,
real_inner_smul_left, real_inner_smul_right, div_pow, neg_sq]
rw [show η⁻¹ = ((Real.sqrt η) ^ 2)⁻¹ by rw [hr2]]
field_simp [hr0]
linear_combination (‖z.1 - c y xRef‖ ^ 2 + (Real.sqrt η) ^ 2 * ‖z.2‖ ^ 2) *
Real.sin_sq_add_cos_sq t
Exact compiled contiguous proof BODY; local literal c,Φ,H and preceding facts remain in scope.
6. Evaluate the half-turn and collect the nine laws
At t=π, sin π=0 and cos π=−1, so X_π=c−(x−c)=2c−x and P_π=−p. Collect the continuity/Borel, initial, group, two inverse, ODE, nonnegative-energy, conservation and half-turn conclusions. This endpoint belongs to a deterministic arc only; stochastic bounces may change the eventual terminal law.
Corresponding Lean step
have hpi (y xRef : E) (z : E × E) :
Φ y xRef Real.pi z = ((2 : ℝ) • c y xRef - z.1, -z.2) := by
apply Prod.ext <;> dsimp [Φ]
· simp only [Real.cos_pi, Real.sin_pi, mul_zero, zero_smul, add_zero, neg_smul,
one_smul]
module
· simp
exact ⟨hcont, hcont.measurable, hzero, hgroup, hinverse, hode, hnonneg, henergy, hpi⟩
Exact compiled contiguous proof BODY; local literal c,Φ,H and preceding facts remain in scope.
Lean verification
The exact proof begins folded immediately after the mathematical argument; the statement is folded beside the claim above.
Lean proof · actual_harmonic_flow_laws
Establish the scale and joint continuity; Verify identity, group composition and inverse; Differentiate the two actual coordinates; Keep the weighted energy nonnegative; Cancel the mixed terms in the conserved energy; Evaluate the half-turn and collect the nine laws
Braces mark parameters Lean can infer; square brackets request structures such as a measurable space or probability measure. Named hypotheses are mathematical premises, not facts established by this declaration. Section parameters are described in the mathematical hypotheses above; the module link retains their exact source context.
theorem actual_harmonic_flow_laws
{E : Type*} [NormedAddCommGroup E] [InnerProductSpace ℝ E]
[FiniteDimensional ℝ E] [MeasurableSpace E] [BorelSpace E]
{V : E → ℝ} {α β : ℝ≥0} {η : ℝ}
(hα : 0 < (α : ℝ)) (hαβ : α ≤ β) (hV : ContDiff ℝ 2 V)
(hH : ∀ x v : E,
(α : ℝ) * ‖v‖ ^ 2 ≤ (fderiv ℝ (fderiv ℝ V) x v) v ∧
(fderiv ℝ (fderiv ℝ V) x v) v ≤ (β : ℝ) * ‖v‖ ^ 2)
(hη : 0 < η) (hβη : (β : ℝ) * η ≤ 1) :
actual_harmonic_flow_statement hα hαβ hV hH hη hβη := by
let c : E → E → E := fun y xRef => y - η • gradient V xRef
let Φ : E → E → ℝ → (E × E) → (E × E) := fun y xRef t z =>
(c y xRef + Real.cos t • (z.1 - c y xRef) +
(Real.sqrt η * Real.sin t) • z.2,
(-Real.sin t / Real.sqrt η) • (z.1 - c y xRef) + Real.cos t • z.2)
let H : E → E → (E × E) → ℝ := fun y xRef z =>
(η⁻¹ * ‖z.1 - c y xRef‖ ^ 2 + ‖z.2‖ ^ 2) / 2
change
Continuous (fun a : (E × E) × ℝ × (E × E) =>
Φ a.1.1 a.1.2 a.2.1 a.2.2) ∧
Measurable (fun a : (E × E) × ℝ × (E × E) =>
Φ a.1.1 a.1.2 a.2.1 a.2.2) ∧
(∀ y xRef : E, ∀ z : E × E, Φ y xRef 0 z = z) ∧
(∀ y xRef : E, ∀ s t : ℝ, ∀ z : E × E,
Φ y xRef (s + t) z = Φ y xRef s (Φ y xRef t z)) ∧
(∀ y xRef : E, ∀ t : ℝ, ∀ z : E × E,
Φ y xRef (-t) (Φ y xRef t z) = z ∧
Φ y xRef t (Φ y xRef (-t) z) = z) ∧
(∀ y xRef : E, ∀ t : ℝ, ∀ z : E × E,
HasDerivAt (fun s : ℝ => (Φ y xRef s z).1)
(Real.sqrt η • (Φ y xRef t z).2) t ∧
HasDerivAt (fun s : ℝ => (Φ y xRef s z).2)
(-(Real.sqrt η)⁻¹ • ((Φ y xRef t z).1 - y) -
Real.sqrt η • gradient V xRef) t) ∧
(∀ y xRef : E, ∀ z : E × E, 0 ≤ H y xRef z) ∧
(∀ y xRef : E, ∀ t : ℝ, ∀ z : E × E,
H y xRef (Φ y xRef t z) = H y xRef z) ∧
(∀ y xRef : E, ∀ z : E × E,
Φ y xRef Real.pi z = ((2 : ℝ) • c y xRef - z.1, -z.2))
have hr : 0 < Real.sqrt η := Real.sqrt_pos.2 hη
have hr0 : Real.sqrt η ≠ 0 := ne_of_gt hr
have hr2 : (Real.sqrt η) ^ 2 = η := Real.sq_sqrt hη.le
have hgrad : Continuous (fun x : E => gradient V x) :=
AutoSamplingTheory.TechnicalLemmas.Analysis.Calculus.Gradient.continuous_gradient_of_contDiff_one
(hV.of_le (by norm_num))
have hc : Continuous (fun a : E × E => c a.1 a.2) := by
dsimp [c]
fun_prop
have hcont : Continuous (fun a : (E × E) × ℝ × (E × E) =>
Φ a.1.1 a.1.2 a.2.1 a.2.2) := by
dsimp [Φ]
fun_prop
have hzero (y xRef : E) (z : E × E) : Φ y xRef 0 z = z := by
apply Prod.ext <;> dsimp [Φ]
· simp only [Real.cos_zero, Real.sin_zero, one_smul, mul_zero, zero_smul, add_zero]
module
· simp
have hgroup (y xRef : E) (s t : ℝ) (z : E × E) :
Φ y xRef (s + t) z = Φ y xRef s (Φ y xRef t z) := by
apply Prod.ext <;> dsimp [Φ]
all_goals
rw [Real.cos_add, Real.sin_add]
match_scalars <;> (try field_simp [hr0]) <;> ring
have hinverse (y xRef : E) (t : ℝ) (z : E × E) :
Φ y xRef (-t) (Φ y xRef t z) = z ∧
Φ y xRef t (Φ y xRef (-t) z) = z := by
constructor
· rw [← hgroup, neg_add_cancel, hzero]
· rw [← hgroup, add_neg_cancel, hzero]
have hode (y xRef : E) (t : ℝ) (z : E × E) :
HasDerivAt (fun s : ℝ => (Φ y xRef s z).1)
(Real.sqrt η • (Φ y xRef t z).2) t ∧
HasDerivAt (fun s : ℝ => (Φ y xRef s z).2)
(-(Real.sqrt η)⁻¹ • ((Φ y xRef t z).1 - y) -
Real.sqrt η • gradient V xRef) t := by
constructor
· have hx := ((hasDerivAt_const t (c y xRef)).add
((Real.hasDerivAt_cos t).smul_const (z.1 - c y xRef))).add
(((Real.hasDerivAt_sin t).const_mul (Real.sqrt η)).smul_const z.2)
apply hx.congr_deriv
dsimp [Φ]
match_scalars <;> (try field_simp [hr0]) <;> ring
· have hp := (((Real.hasDerivAt_sin t).neg.div_const (Real.sqrt η)).smul_const
(z.1 - c y xRef)).add ((Real.hasDerivAt_cos t).smul_const z.2)
apply hp.congr_deriv
dsimp [Φ, c]
match_scalars <;> (try field_simp [hr0]) <;> nlinarith only [hr2]
have hnonneg (y xRef : E) (z : E × E) : 0 ≤ H y xRef z := by
exact div_nonneg (add_nonneg (mul_nonneg (inv_nonneg.2 hη.le) (sq_nonneg _))
(sq_nonneg _)) (by norm_num)
have henergy (y xRef : E) (t : ℝ) (z : E × E) :
H y xRef (Φ y xRef t z) = H y xRef z := by
have hcenter : (Φ y xRef t z).1 - c y xRef =
Real.cos t • (z.1 - c y xRef) + (Real.sqrt η * Real.sin t) • z.2 := by
dsimp [Φ]
module
dsimp only [H]
rw [hcenter]
dsimp only [Φ]
congr 1
rw [norm_add_sq_real, norm_add_sq_real]
simp only [norm_smul, Real.norm_eq_abs, mul_pow, sq_abs,
real_inner_smul_left, real_inner_smul_right, div_pow, neg_sq]
rw [show η⁻¹ = ((Real.sqrt η) ^ 2)⁻¹ by rw [hr2]]
field_simp [hr0]
linear_combination (‖z.1 - c y xRef‖ ^ 2 + (Real.sqrt η) ^ 2 * ‖z.2‖ ^ 2) *
Real.sin_sq_add_cos_sq t
have hpi (y xRef : E) (z : E × E) :
Φ y xRef Real.pi z = ((2 : ℝ) • c y xRef - z.1, -z.2) := by
apply Prod.ext <;> dsimp [Φ]
· simp only [Real.cos_pi, Real.sin_pi, mul_zero, zero_smul, add_zero, neg_smul,
one_smul]
module
· simp
exact ⟨hcont, hcont.measurable, hzero, hgroup, hinverse, hode, hnonneg, henergy, hpi⟩
end
end AutoSamplingTheory.ExampleCases.ProximalBPS.ActualHarmonicFlow
#print axioms AutoSamplingTheory.ExampleCases.ProximalBPS.ActualHarmonicFlow.actual_harmonic_flow_lawsSource assumptions versus formal assumptions
| Source | Actual Lean | Difference kind | Why it matters |
|---|---|---|---|
| Finite-dimensional Euclidean state with source C² potential, 0<α≤β, both global Hessian bounds, η>0 and βη≤1. | E is a finite-dimensional real inner-product space with its norm and a measurable structure equal to its Borel structure. Rank zero is allowed; the product space uses its usual product structures. V:E→ℝ is twice continuously Frechet differentiable on all E. The nonnegative moduli α,β satisfy 0<α and α≤β, and α‖v‖²≤D²V(x)[v,v]≤β‖v‖² for every x,v∈E. The real step η satisfies η>0 and βη≤1. The endpoint αη=1 is allowed. The original six analytic callers are retained; only C² for gradient continuity and η>0 are invoked in this deterministic proof. | same | Retain the original six source-standing analytic conditions. Inner-product-coordinate presentation and Borel typing do not add regularity. Rank-zero degenerate extension is explicit and checked. |
| Printed deterministic harmonic arc and preserved weighted energy; elementary continuity/group/differentiation details are implicit. | Let E be a finite-dimensional real inner-product Borel space, including rank zero. Let V:E→ℝ be C² on all E, let α,β≥0 satisfy 0<α≤β and α‖v‖²≤D²V(x)[v,v]≤β‖v‖² for all x,v∈E, and assume η>0 and βη≤1. For every y,xRef∈E set c=y−η∇V(xRef), and for t∈ℝ, z=(x,p)∈E×E define Φ_t(z)=(c+cos(t)(x−c)+√η sin(t)p,−sin(t)(x−c)/√η+cos(t)p) and H(z)=(η⁻¹‖x−c‖²+‖p‖²)/2. Then (1) the map (y,xRef,t,z)↦Φ_t(z) is jointly continuous on (E×E)×ℝ×(E×E); (2) it is jointly Borel measurable; (3) Φ_0(z)=z; (4) Φ_{s+t}(z)=Φ_s(Φ_t(z)) for all real s,t; (5) Φ_{−t}(Φ_t(z))=Φ_t(Φ_{−t}(z))=z; (6) writing (X_t,P_t)=Φ_t(z), both time derivatives exist at every real t and satisfy dX_t/dt=√η P_t and dP_t/dt=−(X_t−y)/√η−√η∇V(xRef); (7) H(z)≥0; (8) H(Φ_t(z))=H(z); and (9) Φ_π(z)=(2c−x,−p). These conclusions quantify every displayed parameter and state. The original six source-standing callers persist; the deterministic calculation invokes C² through gradient continuity and η>0, while the two Hessian bounds, positive lower modulus and step cap are retained rather than used in its BODY. No energy positivity, positive dimension, strict endpoint or higher derivative assumption is added. This is the actual deterministic arc ingredient of the cited algorithm, with ASTIS supplying the omitted elementary continuity, group, differentiation and norm-cancellation bridges. It does not construct the stochastic trajectory, prove nonexplosion or identify an invariant/terminal sampling law. | source-implicit | The literal coordinates and weighted sum are unchanged. Missing deterministic bridges are proved internally using the canonical gradient producer and fixed Mathlib; no proof certificate is a caller premise. |
| Stochastic trajectory/nonexplosion/invariance/actual terminal kernel and sampling complexity. | Only the actual deterministic harmonic segment and its nine stated laws are focused-compiled. The measurable stochastic bounce/rate/clock recursion, nonexplosion, actual half-turn H_y and terminal Markov kernel, reversal, invariance, same-J lift, actual K/r_rho/B27/B28, full PBPS/SPHMC main results, implementation errors/caps, expected-query costs and actual-input composition remain open. Independent review, serialized integration, full Exposition Seal, PURIFIED, main/live and whole-Goal completion are separate admissions. | unresolved | Deterministic harmonic laws alone do not produce clocks, bounce recursion, invariant laws, costs or the full paper. |
Only the actual deterministic harmonic segment and its nine stated laws are focused-compiled. The measurable stochastic bounce/rate/clock recursion, nonexplosion, actual half-turn H_y and terminal Markov kernel, reversal, invariance, same-J lift, actual K/r_rho/B27/B28, full PBPS/SPHMC main results, implementation errors/caps, expected-query costs and actual-input composition remain open. Independent review, serialized integration, full Exposition Seal, PURIFIED, main/live and whole-Goal completion are separate admissions.
Encoder–denoiser: source-reviewed · equivalent-after-elaboration
Detected semantic differences
- objects: Decoder q is the unrestricted source/current first coordinate x. Actual cached-gradient center, two coordinates and weighted SUM energy are preserved exactly. — runs/20261007-companion-priority/pbps-actual-harmonic-flow73/independent-source73/caller-definition-nine-conclusion-review73.json and whole178-line-coverage73.json; actual literal20–56 and duplicate definitions69–75. Frozen primary S3.E4/S4.E5/A1.EGx1/A1.Ex4. Gradient convention matches the independently source-checked canonical local producer.
- domains: Finite real Hilbert/Borel and rank-zero presentation explicitly elaborates source Euclidean coordinates; full joint domain has five scalar/vector inputs packaged as four y,xRef,t,z arguments. No product norm is substituted. — runs/20261007-companion-priority/pbps-actual-harmonic-flow73/independent-source73/caller-definition-nine-conclusion-review73.json; literal21–23/36–39, production104–110 and hcont.measurable173. Coordinate-free finite-Hilbert/Borel and rank0 elaboration was frozen before implementation; no positive-dimension assumption.
- quantifiers: All-real group/inverse/time scope is a frozen source-derived elementary extension of the explicit arc. It is proved from the same literal formula, not supplied as a caller. — runs/20261007-companion-priority/pbps-actual-harmonic-flow73/independent-source73/caller-definition-nine-conclusion-review73.json; source S3.Prop3.1 fixed inputs, S4.E5 restart and A1 literal; current literal36–56 and hzero/hgroup/hinverse/hode/hnonneg/henergy/hpi111–172. No Gaussian-support restriction or additional relation on reference/state.
- assumptions: NNReal modulus carriers and real quadratic-form expansion preserve original both Hessian bounds and non-strict cap. Six callers remain; only hV/hη are actually used in this deterministic BODY. — runs/20261007-companion-priority/pbps-actual-harmonic-flow73/independent-source73/caller-definition-nine-conclusion-review73.json: private and public caller prefixes byte-equal to source-reviewed prospective header. BODY101–103 uses hV,98–100/146–148 uses hη; hα,hαβ,hH,hβη are retained but not invoked in the deterministic proof.
- conclusion: Seven omitted deterministic bridges are produced internally, including the already existing canonical Gradient theorem. This completes the selected nine-clause contract without promoting any ingredient to a public premise. — runs/20261007-companion-priority/pbps-actual-harmonic-flow73/independent-source73/source-proof-implementation-coverage73.json (all23nodes/37edges/7bridge productions), source79-current-coverage73.json and six-step-formula-exposition-review73.json. Full proof final tuple173 contains every conjunct; formula and constant/sign checks completed.
- conclusion: Energy is half the weighted sum of separate squared E norms. The proof expands both norm squares, cancels opposite real inner cross terms, preserves the exact weight and factor, and uses sin²+cos²=1. — runs/20261007-companion-priority/pbps-actual-harmonic-flow73/independent-source73/six-step-formula-exposition-review73.json step4; BODY149–165; primary A1.Ex4 and A1.SS1.p3.2.
- scopes: Complete private literal is definitionally unchanged from the source-reviewed header and acts as a proposition specification, not a provider. Public proof changes to exactly those nine clauses and supplies all of them. — runs/20261007-companion-priority/pbps-actual-harmonic-flow73/independent-source73/whole178-line-coverage73.json; unchanged complete private literal20–56, public58–67, definitionally exact change69–97 and final173. All55 source exclusions remain explicitly excluded; lesson helper is full private literal identity and boundary expressly distinguishes deterministic pi from stochastic terminal law.
- scopes: All55 stochastic/measure/kernel/cost exclusions remain excluded. The deterministic pi endpoint is not the actual bounced terminal H_y law, and no B27/B28 or full PBPS/SPHMC result follows here. — runs/20261007-companion-priority/pbps-actual-harmonic-flow73/independent-source73/source79-current-coverage73.json and exact lesson/binding boundaries.
- constant_dependencies: Positive eta supplies sqrt reciprocal identities internally. Same actual center gives the exact second ODE force with fixed xRef; no higher derivative, nonzero-energy/normal, positive dimension or strict endpoint condition is added. — runs/20261007-companion-priority/pbps-actual-harmonic-flow73/independent-source73/caller-definition-nine-conclusion-review73.json and six-step-formula-exposition-review73.json; sqrt scale98–100, derivative135–145, energy151–165 and endpoint166–172. Rank0/alphaeta1/zero-energy cases require no extra dependency.
- scopes: Source URL #A1 is an accurate broad AppendixA parent containing A.1; the independent fixed-RAW anchor check confirms exact source identity without a network refresh. — runs/20261007-companion-priority/pbps-actual-harmonic-flow73/independent-source73/StageB.source-URL-anchor-accuracy73.json
A generalization is not a source correction. Proposed missing conditions require separate independent repair review. No proposed repair silently changes the original theorem.
Scope and omitted-condition boundaries
- Only the actual deterministic harmonic segment and its nine stated laws are focused-compiled. The measurable stochastic bounce/rate/clock recursion, nonexplosion, actual half-turn H_y and terminal Markov kernel, reversal, invariance, same-J lift, actual K/r_rho/B27/B28, full PBPS/SPHMC main results, implementation errors/caps, expected-query costs and actual-input composition remain open. Independent review, serialized integration, full Exposition Seal, PURIFIED, main/live and whole-Goal completion are separate admissions.
Sources, dependencies, and reuse
Source and reuse
Samplinglib parents called
Mathlib API called (external library)
- Real.sqrt_pos
- Real.sq_sqrt
- Real.cos_add
- Real.sin_add
- Real.hasDerivAt_cos
- Real.hasDerivAt_sin
- HasDerivAt.smul_const
- HasDerivAt.congr_deriv
- norm_add_sq_real
- norm_smul
- real_inner_smul_left
- real_inner_smul_right
- Real.sin_sq_add_cos_sq
- Continuous.measurable
- Real.sin_pi
- Real.cos_pi
Mathematical sources
- PBPS Algorithm1 harmonic arcs, Section3 exact dynamics and AppendixA.1 ODE/weighted-energy formulas; deterministic construction prerequisite for Proposition3.1 — Only the actual deterministic harmonic segment and its nine stated laws are focused-compiled. The measurable stochastic bounce/rate/clock recursion, nonexplosion, actual half-turn H_y and terminal Markov kernel, reversal, invariance, same-J lift, actual K/r_rho/B27/B28, full PBPS/SPHMC main results, implementation errors/caps, expected-query costs and actual-input composition remain open. Independent review, serialized integration, full Exposition Seal, PURIFIED, main/live and whole-Goal completion are separate admissions.
Samplinglib prose is not a quotation or a source-equivalence certificate. Definitions and aliases are explained as constructions, not counted as new mathematical proofs.