From 536c51952eb5aaec9e46bf6aa7aa1c94283eff5e Mon Sep 17 00:00:00 2001
From: Antoine Hoffmann <antoine.hoffmann@epfl.ch>
Date: Mon, 17 Apr 2023 16:49:35 +0200
Subject: [PATCH] anti_aliasing filtering at each step is safer
---
src/stepon.F90 | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/stepon.F90 b/src/stepon.F90
index 321d853f..16a25bbd 100644
--- a/src/stepon.F90
+++ b/src/stepon.F90
@@ -115,7 +115,7 @@ CONTAINS
LOGICAL :: checkf_
REAL :: sum_
!! Maybe useless
- ! IF(LINEARITY .NE. 'linear') CALL anti_aliasing ! ensure 0 mode for 2/3 rule
+ IF(LINEARITY .NE. 'linear') CALL anti_aliasing ! ensure 0 mode for 2/3 rule
! IF(LINEARITY .NE. 'linear') CALL enforce_symmetry ! Enforcing symmetry on kx = 0
mlend=.FALSE.
--
GitLab