Changeset 2818 for palm/trunk/SOURCE/read_var_list.f90

Timestamp:

Feb 19, 2018 4:42:36 PM (7 years ago)

Author:

maronga

Message:

improvements in spinup mechanism

File:

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

palm/trunk/SOURCE/read_var_list.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Added spinup_time to allow for restarts with spinup in precursor run.
+! 
+! 2776 2018-01-31 10:44:42Z Giersch
 ! Change skip_var_list: Skipping of module related parameter is only necessary 
 ! if restart data was outputted at the end of the precursor run
@@ -294 +297 @@
 !-- Make version number check first
     READ ( 13 )  version_on_file
-    binary_version = '4.5'
+    binary_version = '4.6'
     IF ( TRIM( version_on_file ) /= TRIM( binary_version ) )  THEN
        WRITE( message_string, * ) 'version mismatch concerning control ', &
@@ -693 +696 @@
           CASE ( 'simulated_time' )
              READ ( 13 )  simulated_time
+          CASE ( 'spinup_time' ) 
+             READ ( 13 )  spinup_time
           CASE ( 'surface_heatflux' )
              READ ( 13 )  surface_heatflux