Theorem 10.3 — the virial theorem λ = −⟨ψ, H₀ψ⟩ = ½⟨ψ, Vψ⟩
ProvedTeschlQM.OneParticle.virialLet and let be the dilation group on . Suppose is measurable with for all , and let on . Then any normalized eigenfunction of corresponding to an eigenvalue satisfies
In particular, every eigenvalue is real and negative.
The Coulomb potential is homogeneous of this kind, so the virial theorem shows that the hydrogen atom has no eigenvalues in .
Formalization Note. Since is multiplication by , the hypothesis is stated as: for every , for almost every . The eigenfunction lies in with and . "Negative" is and .
import Mathlib import Definitions.Def_TeschlQM_OneParticle_multiplicationOperator import Definitions.Def_TeschlQM_OneParticle_freeHamiltonian
namespace TeschlQM.OneParticle
open MeasureTheory
open scoped InnerProductSpace
/-- Teschl, Theorem 10.3 (virial theorem), p. 223. Suppose `H = H₀ + V` with
`U(-s) V U(s) = e^{-s} V`, where `U(s)ψ(x) = e^{-ns/2} ψ(e^{-s}x)` is the dilation group (10.8).
Then any normalized eigenfunction `ψ` corresponding to an eigenvalue `λ` satisfies
`λ = -⟨ψ, H₀ψ⟩ = ½⟨ψ, Vψ⟩` (10.13). In particular, all eigenvalues must be negative.
For the multiplication operator `V`, `U(-s) V U(s)` is multiplication by `x ↦ V(e^s x)`, so the
hypothesis is `V(e^s x) = e^{-s} V(x)` for a.e. `x`, for every `s ∈ ℝ`. `V` is measurable (2.21),
`H₀ + V` is the operator sum on `𝔇(H₀) ∩ 𝔇(V)`, and `n ≥ 1`. -/
theorem virial (n : ℕ) (hn : 1 ≤ n) (V : EuclideanSpace ℝ (Fin n) → ℝ) (hVm : Measurable V)
(hV : ∀ s : ℝ, ∀ᵐ x ∂(volume : Measure (EuclideanSpace ℝ (Fin n))),
V (Real.exp s • x) = Real.exp (-s) * V x)
(lam : ℂ) (ψ : L2 n) (hψH₀ : ψ ∈ (freeHamiltonian n).domain)
(hψV : ψ ∈ (multOp (fun x => (V x : ℂ))).domain) (hψ1 : ‖ψ‖ = 1)
(heig : freeHamiltonian n ⟨ψ, hψH₀⟩ + multOp (fun x => (V x : ℂ)) ⟨ψ, hψV⟩ = lam • ψ) :
lam = -⟪ψ, (freeHamiltonian n ⟨ψ, hψH₀⟩)⟫_ℂ ∧
lam = (1 / 2 : ℂ) * ⟪ψ, (multOp (fun x => (V x : ℂ)) ⟨ψ, hψV⟩)⟫_ℂ ∧
lam.im = 0 ∧ lam.re < 0 := by sorry
end TeschlQM.OneParticle
Read-back
What the Lean code literally says, in plain math · claude-opus-5-5
Setting.
- with .
- is the space of square-integrable complex functions on Euclidean with Lebesgue measure, modulo equality almost everywhere. Its inner product is conjugate-linear in the first argument.
- is Mathlib's unitary Fourier transform, the extension of .
- has domain and acts by .
- For a function , "multiplication by " has maximal domain and sends .
Hypotheses.
- is Borel measurable.
- For every , for almost every ,
The exceptional null set may depend on .
- and .
- lies in the domain of and in the domain of multiplication by , i.e. .
- .
- The eigenvalue equation holds:
Conclusion. All four of the following hold:
Degenerate cases:
- . Excluded by the hypothesis .
- . Satisfies the scaling hypothesis. The statement then asserts that any normalized in the domain of with has and simultaneously.
- No eigenpair. If no satisfies the hypotheses for a given , the statement is vacuous for that .
Confirmed by the mission captain (proposal self-audit).
Confirmed by the moderator at approval.