Changeset 4569 for palm/trunk/UTIL/inifor

Timestamp:

Jun 19, 2020 12:46:17 PM (4 years ago)

Author:

eckhard

Message:

Removed unused variable

File:

• palm/trunk/UTIL/inifor/src/inifor_io.f90 (modified) (2 diffs)

palm/trunk/UTIL/inifor/src/inifor_io.f90

@@ -26 +26 @@
 ! -----------------
 ! $Id$
+! Removed unused variable
+! 
+! 
+! 4568 2020-06-19 11:56:30Z eckhard
 ! Handle COSMO soil data with and without additional surface temperature
 ! 
@@ -1598 +1602 @@
     CHARACTER(LEN=*), INTENT(IN) ::  filename
     
-    CHARACTER(LEN=NF90_MAX_NAME) ::  dimname
     REAL(wp), ALLOCATABLE        ::  depths(:)