Changeset 2946 for palm/trunk/SOURCE/synthetic_turbulence_generator_mod.f90

Timestamp:

Apr 4, 2018 5:01:23 PM (7 years ago)

Author:

suehring

Message:

Bugfix for revision 2945, perform checks only if dynamic input file is available; remove unused module load

File:

• palm/trunk/SOURCE/synthetic_turbulence_generator_mod.f90 (modified) (2 diffs)

palm/trunk/SOURCE/synthetic_turbulence_generator_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Remove unused module load
+! 
+! 2945 2018-04-04 16:27:14Z suehring
 ! - Bugfix in parallelization of synthetic turbulence generator in case the 
 !   z-dimension is not an integral divisor of the number of processors along  
@@ -1393 +1396 @@
         ONLY: ny
 
-    USE pegrid
-
     IMPLICIT NONE