From 4f5ee2b038da4aba47fcbbef0e8055ebb894fa12 Mon Sep 17 00:00:00 2001
From: Antoine Hoffmann <antoine.hoffmann@epfl.ch>
Date: Tue, 4 Jul 2023 18:17:06 +0200
Subject: [PATCH] FORGOT A DEBUG 0x
---
src/fourier_mod.F90 | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/fourier_mod.F90 b/src/fourier_mod.F90
index e84bb5d2..302aeb57 100644
--- a/src/fourier_mod.F90
+++ b/src/fourier_mod.F90
@@ -139,7 +139,7 @@ MODULE fourier
call fftw_mpi_execute_dft_c2r(planb, cmpx_data_f, real_data_f)
call fftw_mpi_execute_dft_c2r(planb, cmpx_data_g, real_data_g)
#endif
- sum_real_ = sum_real_ - 0*real_data_f*real_data_g*inv_Ny*inv_Nx
+ sum_real_ = sum_real_ - real_data_f*real_data_g*inv_Ny*inv_Nx
END SUBROUTINE poisson_bracket_and_sum
--
GitLab