Changeset 1092 for palm/trunk/SOURCE/read_var_list.f90

Timestamp:

Feb 2, 2013 11:24:22 AM (11 years ago)

Author:

raasch

Message:

unused variables remove from several routines

File:

• palm/trunk/SOURCE/read_var_list.f90 (modified) (3 diffs)

palm/trunk/SOURCE/read_var_list.f90

@@ -20 +20 @@
 ! Current revisions:
 ! ------------------
+! unused variables removed
 !
 ! Former revisions:
@@ -174 +175 @@
     CHARACTER (LEN=10) ::  binary_version, version_on_file
     CHARACTER (LEN=30) ::  variable_chr
-
-    LOGICAL ::  ldum
 
 
@@ -792 +791 @@
     CHARACTER (LEN=1)  ::  cdum
 
-    INTEGER ::  idum, max_pr_user_on_file, nz_on_file, &
+    INTEGER ::  max_pr_user_on_file, nz_on_file, &
                 statistic_regions_on_file, tmp_mpru, tmp_sr