Changeset 4440 for palm/trunk/SOURCE

Timestamp:

Mar 4, 2020 9:46:52 AM (5 years ago)

Author:

suehring

Message:

Correct misplaced preprocessor directive

File:

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

palm/trunk/SOURCE/synthetic_turbulence_generator_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Correct misplaced preprocessor directive
+! 
+! 4438 2020-03-03 20:49:28Z suehring
 ! Performance optimizations in velocity-seed calculation:
 !  - random number array is only defined and computed locally (except for 
@@ -701 +704 @@
        
        ENDIF
+#endif
     ENDIF
-
-#endif
 !
 !-- Allocate required arrays.