Changeset 4848 for palm/trunk/SOURCE/read_restart_data_mod.f90

Timestamp:

Jan 21, 2021 3:51:51 PM (3 years ago)

Author:

gronemeier

Message:

bugfix: removed syn_turb_gen from restart files, replaced use_syn_turb_gen by syn_turb_gen

File:

• palm/trunk/SOURCE/read_restart_data_mod.f90 (modified) (4 diffs)

palm/trunk/SOURCE/read_restart_data_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! bugfix: removed syn_turb_gen from restart files
+!
+! 4845 2021-01-18 11:15:37Z raasch
 ! arrays removed that were required for radiation boundary conditions
 !
@@ -42 +45 @@
 ! Bugfix in allocation of hom and hom_sum in case of mpi-io restart when
 ! chemistry or salsa are employed
-! 
+!
 ! 4580 2020-06-29 07:54:21Z raasch
 ! data handling with MPI-IO for cyclic-fill added (so far only for global data)
-! 
+!
 ! 4564 2020-06-12 14:03:36Z raasch
 ! Vertical nesting method of Huq et al. (2019) removed
-! 
+!
 ! 4539 2020-05-18 14:05:17Z raasch
 ! location message added
-! 
+!
 ! 4536 2020-05-17 17:24:13Z raasch
 ! binary version incremented
-! 
+!
 ! 4534 2020-05-14 18:35:22Z raasch
 ! adjustments for I/O on reduced number of cores using shared memory MPI
-! 
+!
 ! 4518 2020-05-04 15:44:28Z suehring
 ! Move input of diagnostic output quantities to doq_rrd_local
-! 
+!
 ! 4517 2020-05-03 14:29:30Z raasch
 ! qsurf and ssurf added
-! 
+!
 ! 4498 2020-04-15 14:26:31Z raasch
 ! argument removed from rd_mpi_io_open
-! 
+!
 ! 4496 2020-04-15 08:37:26Z raasch
 ! bugfix: MPI barrier removed, coupling character added to input filename
-! 
+!
 ! 4495 2020-04-13 20:11:20Z raasch
 ! restart data handling with MPI-IO added
-! 
+!
 ! 4435 2020-03-03 10:38:41Z raasch
 ! bugfix for message that reports about files that are read from in case that the virtual PE grid
 ! has chenged (in case of large number of files format was exceeded), detailed messages about the
 ! files are now output to the debug file
-! 
+!
 ! 4431 2020-02-27 23:23:01Z gronemeier
 ! added u_center_av, v_center_av, wspeed_av
@@ -283 +286 @@
        READ ( 13 )  version_on_file
 
-       binary_version_global = '5.1'
+       binary_version_global = '5.2'
        IF ( TRIM( version_on_file ) /= TRIM( binary_version_global ) )  THEN
           WRITE( message_string, * ) 'version mismatch concerning ',           &
@@ -1093 +1096 @@
        CALL rrd_mpi_io( 'surface_scalarflux', surface_scalarflux )
        CALL rrd_mpi_io( 'surface_waterflux', surface_waterflux )
-       CALL rrd_mpi_io( 'syn_turb_gen', syn_turb_gen )
        CALL rrd_mpi_io( 'time_coupling', time_coupling )
        CALL rrd_mpi_io( 'time_disturb', time_disturb )