From 9b17d16b5e1a6920adc9d08ac0123bdc257b3998 Mon Sep 17 00:00:00 2001 From: Jaron Kent-Dobias Date: Sun, 20 Apr 2025 20:36:56 -0300 Subject: Removed singularity at τ₀ = 2 MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- log-fourier_integrator.cpp | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'log-fourier_integrator.cpp') diff --git a/log-fourier_integrator.cpp b/log-fourier_integrator.cpp index 412b4d9..5544f18 100644 --- a/log-fourier_integrator.cpp +++ b/log-fourier_integrator.cpp @@ -86,7 +86,11 @@ int main(int argc, char* argv[]) { /* Start from the exact solution for β = 0 */ for (unsigned n = 0; n < N; n++) { if (τ₀ > 0) { - Cₜ₋₁[n] = Γ₀ * (exp(-μₜ₋₁ * fft.t(n)) - μₜ₋₁ * τ₀ * exp(-fft.t(n) / τ₀)) / (μₜ₋₁ - pow(μₜ₋₁, 3) * pow(τ₀, 2)); + if (τ₀ == 2) { + Cₜ₋₁[n] = Γ₀ * exp(-fft.t(n) / 2) * (1 + fft.t(n) / 2); + } else { + Cₜ₋₁[n] = Γ₀ * (exp(-μₜ₋₁ * fft.t(n)) - μₜ₋₁ * τ₀ * exp(-fft.t(n) / τ₀)) / (μₜ₋₁ - pow(μₜ₋₁, 3) * pow(τ₀, 2)); + } } else { Cₜ₋₁[n] = Γ₀ * exp(-μₜ₋₁ * fft.t(n)) / μₜ₋₁; } -- cgit v1.2.3-70-g09d2