diff --git a/src/stepon.F90 b/src/stepon.F90 index 930a6b2c594127317f1af0636388c1d35c69e593..321d853f2be2cf3c754041a0b7174726514dd08b 100644 --- a/src/stepon.F90 +++ b/src/stepon.F90 @@ -114,8 +114,9 @@ CONTAINS IMPLICIT NONE LOGICAL :: checkf_ REAL :: sum_ - 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 + !! Maybe useless + ! 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. IF(.NOT.nlend) THEN