Changeset 4764

Timestamp:

Oct 30, 2020 12:50:36 PM (4 years ago)

Author:

suehring

Message:

Missing variable declaration and directives for netcdf4 added

File:

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

palm/trunk/SOURCE/virtual_measurement_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Missing variable declaration and directives for netcdf4 added
+!
+! 4763 2020-10-30 12:06:47Z suehring
 ! - Simplified input of coordinates. All coordinate and height arrays are now 1D, independent on
 !   featuretype. This allows easier usage also for other campaign data sets independent of UC2.
@@ -875 +878 @@
     INTEGER(iwp) ::  ll         !< running index over all measured variables in file
     INTEGER(iwp) ::  m          !< running index for surface elements
+#if defined( __netcdf4_parallel )
+    INTEGER(iwp) ::  n          !< running index over all cores
+#endif
     INTEGER(iwp) ::  nofill     !< dummy for nofill return value (not used)
     INTEGER(iwp) ::  ns         !< counter variable for number of observation points on subdomain