Changeset 3768 for palm/trunk/SOURCE/user_dvrp_coltab.f90

Timestamp:

Feb 27, 2019 2:35:58 PM (5 years ago)

Author:

raasch

Message:

variables commented out + statement added to avoid compiler warnings about unused variables

File:

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

palm/trunk/SOURCE/user_dvrp_coltab.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! statement added to avoid compiler warning about unused variable
+! 
+! 3655 2019-01-07 16:51:22Z knoop
 ! Corrected "Former revisions" section
 ! 
@@ -71 +74 @@
     CHARACTER (LEN=*) ::  variable   !< 
 
+!
+!-- Next line is to avoid compiler warning about unused variables. Please remove.
+    IF ( variable(1:1) == ' ' )  CONTINUE
+
 
 !