Changeset 1455 for palm

Timestamp:

Aug 29, 2014 10:47:47 AM (10 years ago)

Author:

heinze

Message:

empty time records in volume, cross-section and masked data output prevented in case of non-parallel netcdf-output in restart runs

File:

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

palm/trunk/SOURCE/check_parameters.f90

@@ -20 +20 @@
 ! Current revisions:
 ! -----------------
-! 
+! empty time records in volume, cross-section and masked data output prevented  
+! in case of non-parallel netcdf-output in restart runs
 ! 
 ! Former revisions:
@@ -3744 +3745 @@
 
 !
+!-- Prevent empty time records in volume, cross-section and masked data in case of 
+!-- non-parallel netcdf-output in restart runs
+    IF ( netcdf_data_format < 5 )  THEN
+       IF ( TRIM( initializing_actions ) == 'read_restart_data' )  THEN
+          do3d_time_count    = 0
+          do2d_xy_time_count = 0
+          do2d_xz_time_count = 0
+          do2d_yz_time_count = 0
+          domask_time_count  = 0
+       ENDIF 
+    ENDIF
+
+!
 !-- Check &userpar parameters
     CALL user_check_parameters