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

Timestamp:

Apr 23, 2018 10:22:58 AM (6 years ago)

Author:

Giersch

Message:

Bugfix: W* and Z_I in the first line of the run control file of restarts correspond now to the values in the last run control output line of the previous run

File:

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

palm/trunk/SOURCE/read_restart_data_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! z_i is also read to use the last known inversion height from the 
+! initial run as the first inversion height which is written into the
+! run control file 
+! 
+! 2956 2018-04-10 11:01:03Z Giersch
 ! spectrum_x and spectrum_y have been moved to global data
 ! 
@@ -124 +129 @@
        USE statistics,                                                         &
            ONLY:  statistic_regions, hom, hom_sum, pr_palm, u_max, u_max_ijk,  &
-                  v_max, v_max_ijk, w_max, w_max_ijk
+                  v_max, v_max_ijk, w_max, w_max_ijk, z_i
 
        USE synthetic_turbulence_generator_mod,                                 &
@@ -748 +753 @@
              CASE ( 'zeta_min' )
                 READ ( 13 )  zeta_min
+             CASE ( 'z_i' )
+                READ ( 13 )  z_i
+
 
              CASE DEFAULT