Changeset 4415 for palm/trunk/SOURCE/transpose.f90

Timestamp:

Feb 20, 2020 10:30:33 AM (4 years ago)

Author:

raasch

Message:

bugfix for misplaced/missing preprocessor directives

File:

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

palm/trunk/SOURCE/transpose.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! bugfix for misplaced preprocessor directive
+! 
+! 4370 2020-01-10 14:00:44Z raasch
 ! vector array renamed
 ! 
@@ -983 +986 @@
           ENDDO
           !$OMP  END PARALLEL
-#endif
 
        ENDIF
+
+#endif
 
     ENDIF