Changeset 345 for palm/trunk/SOURCE/write_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/write_var_list.f90 (modified) (3 diffs)

palm/trunk/SOURCE/write_var_list.f90

@@ -4 +4 @@
 ! Actual revisions:
 ! -----------------
+! +output_for_t0 
 ! bugfix: -dt_fixed, because otherwise, restart runs cannot change from a
 ! fixed to a free timestep.
@@ -65 +66 @@
     USE indices
     USE model_1d
+    USE netcdf_control
     USE particle_attributes
     USE pegrid
@@ -292 +294 @@
     WRITE ( 14 )  'outflow_damping_width         '
     WRITE ( 14 )  outflow_damping_width
+    WRITE ( 14 )  'output_for_t0                 '
+    WRITE ( 14 )  output_for_t0
     WRITE ( 14 )  'overshoot_limit_e             '
     WRITE ( 14 )  overshoot_limit_e