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

Timestamp:

Mar 22, 2018 3:05:23 PM (6 years ago)

Author:

Giersch

Message:

further inipar parameter has been added to restart data, bugfix in spinup mechanism

File:

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

palm/trunk/SOURCE/read_restart_data_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! spinup_time, day_of_year_init and time_utc_init are also read now
+! 
+! 2912 2018-03-20 13:00:05Z knoop
 ! Added gust module interface calls
 ! 
@@ -78 +81 @@
            ONLY:  inflow_damping_factor, mean_inflow_profiles, pt_init,        &
                   q_init, ref_state, s_init, sa_init, u_init, ug, v_init, vg
+
+       USE date_and_time_mod,                                                  &
+           ONLY:  day_of_year_init, time_utc_init
 
        USE flight_mod,                                                         &
@@ -343 +349 @@
              CASE ( 'damp_level_1d' )
                 READ ( 13 )  damp_level_1d
+             CASE ( 'day_of_year_init' )
+                READ ( 13 )  day_of_year_init
              CASE ( 'dissipation_1d' )
                 READ ( 13 )  dissipation_1d
@@ -561 +569 @@
              CASE ( 'simulated_time' )
                 READ ( 13 )  simulated_time
+             CASE ( 'spinup_time' )
+                READ ( 13 )  spinup_time
              CASE ( 'surface_heatflux' )
                 READ ( 13 )  surface_heatflux
@@ -609 +619 @@
              CASE ( 'time_since_reference_point' )
                 READ ( 13 )  time_since_reference_point
+             CASE ( 'time_utc_init' )
+                READ ( 13 )  time_utc_init
              CASE ( 'timestep_scheme' )
                 READ ( 13 )  timestep_scheme