Changeset 2302 for palm/trunk/SOURCE/netcdf_interface_mod.f90

Timestamp:

Jul 3, 2017 2:07:20 PM (7 years ago)

Author:

suehring

Message:

Reading of 3D topography using NetCDF data type NC_BYTE; bugfixes in reading 3D topography from file

File:

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

palm/trunk/SOURCE/netcdf_interface_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Reading of 3D topography using NetCDF data type NC_BYTE
+! 
+! 2292 2017-06-20 09:51:42Z schwenkel
 ! Implementation of new microphysic scheme: cloud_scheme = 'morrison' 
 ! includes two more prognostic equations for cloud drop concentration (nc)  
@@ -5598 +5601 @@
     INTEGER(iwp)                  ::  nz_file         !< number of grid-points in file
 
-    INTEGER(iwp), DIMENSION(nzb:nzt+1), INTENT(INOUT) ::  var  !< variable to be read
+    INTEGER( KIND = 1 ), DIMENSION(nzb:nzt+1), INTENT(INOUT) ::  var  !< variable to be read
 !
 !-- Get dimension of z-axis