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

Timestamp:

Jul 1, 2009 2:37:56 PM (15 years ago)

Author:

heinze

Message:

In case of restart runs without extension, initial profiles are not written to NetCDF-file anymore.

File:

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

palm/trunk/SOURCE/read_var_list.f90

@@ -4 +4 @@
 ! Current revisions:
 ! -----------------
+! +output_for_t0 
 ! dt_fixed is read into a dummy variable.
 ! Output of messages replaced by message handling routine.
@@ -69 +70 @@
     USE indices
     USE model_1d
+    USE netcdf_control
     USE particle_attributes
     USE pegrid
@@ -374 +376 @@
           CASE ( 'outflow_damping_width' )
              READ ( 13 )  outflow_damping_width
+          CASE ( 'output_for_t0' )
+             READ (13)    output_for_t0
           CASE ( 'overshoot_limit_e' )
              READ ( 13 )  overshoot_limit_e