Changeset 3646 for palm/trunk/SOURCE/surface_output_mod.f90

Timestamp:

Dec 28, 2018 5:58:49 PM (5 years ago)

Author:

kanani

Message:

Bugfix: replace simulated_time by time_since_reference_point where required

File:

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

palm/trunk/SOURCE/surface_output_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Bugfix: use time_since_reference_point instead of simulated_time (relevant
+! when using wall/soil spinup)
+! 
+! 3614 2018-12-10 07:05:46Z raasch
 ! unused variables removed
 ! 
@@ -864 +868 @@
    
       USE control_parameters,                                                  &
-          ONLY:  io_blocks, io_group, simulated_time
+          ONLY:  io_blocks, io_group, time_since_reference_point
 
       USE pegrid,                                                              &
@@ -2234 +2238 @@
                WRITE ( 25+av )  LEN_TRIM( 'time' )
                WRITE ( 25+av )  'time'
-               WRITE ( 25+av )  simulated_time
+               WRITE ( 25+av )  time_since_reference_point
                WRITE ( 25+av )  LEN_TRIM( trimvar )
                WRITE ( 25+av )  TRIM( trimvar )