theorem correlationLength_divergence (D τ₀ T Tstar : ℝ) : correlationLengthSq D τ₀ T Tstar = D * τ₀ * (1 - T / Tstar)⁻¹ := by simp [correlationLengthSq, adjustmentTimescale, div_eq_mul_inv, mul_assoc]
thesis/CESProofs/CurvatureRoles/PhaseTransition.lean:178
Phase Transition at T* (Gap #8)