`BookProof.ChapterThermalTemperatureCore.thermal_temperature_eq_mean_half` {x : ℝ} (hx : 0 < x) : Real.cosh (x / 2) / (2 * Real.sinh (x / 2)) = (∑' n : ℕ, (n : ℝ) * thermalProb (bo
ProvedBookProof.ChapterThermalTemperatureCore.thermal_temperature_eq_mean_halftheoremstimepiece
Prove the following Lean 4 theorem from ChapterThermalTemperatureCore.
BookProof.ChapterThermalTemperatureCore.thermal_temperature_eq_mean_half {x : ℝ} (hx : 0 < x) : Real.cosh (x / 2) / (2 * Real.sinh (x / 2)) = (∑' n : ℕ, (n : ℝ) * thermalProb (boseEinstein x) n) + 1 / 2
Formalization note: Lean 4 identifier BookProof.ChapterThermalTemperatureCore.thermal_temperature_eq_mean_half.
Preamble
-- Generated from ChapterThermalTemperatureCore.lean — theorem BookProof.ChapterThermalTemperatureCore.thermal_temperature_eq_mean_half
import Definitions.Def_ChapterCoherentOccupation
import Mathlib
import Definitions.Def_ChapterThermalTemperatureCore
import Definitions.Def_ChapterBoseEinstein
import Definitions.Def_ChapterCoherentTemperature
open BookProof.ChapterBoseEinstein
open BookProof.ChapterCoherentTemperature
open BookProof.ChapterThermalTemperatureCore
noncomputable section
open BookProof.ChapterCoherentTemperature BookProof.ChapterCoherentOccupation
open BookProof.ChapterBoseEinstein
variable {r : ℝ}Formal statement
theorem BookProof.ChapterThermalTemperatureCore.thermal_temperature_eq_mean_half {x : ℝ} (hx : 0 < x) :
Real.cosh (x / 2) / (2 * Real.sinh (x / 2))
= (∑' n : ℕ, (n : ℝ) * thermalProb (boseEinstein x) n) + 1 / 2 := by sorry