Changeset 691 for palm/trunk/SOURCE/data_output_2d.f90

Timestamp:

Mar 4, 2011 8:45:30 AM (13 years ago)

Author:

maronga

Message:

Bugfix for precursor atmosphere/ocean runs, re-adjustments for lcxt4

File:

• palm/trunk/SOURCE/data_output_2d.f90 (modified) (4 diffs)

palm/trunk/SOURCE/data_output_2d.f90

@@ -4 +4 @@
 ! Current revisions:
 ! -----------------
+! Replaced simulated_time by time_since_reference_point
 !
 ! Former revisions:
@@ -727 +728 @@
 #if defined( __netcdf )
                          IF ( netcdf_output  .AND.  myid == 0 )  THEN
-                            WRITE ( 21 )  simulated_time, &
+                            WRITE ( 21 )  time_since_reference_point, &
                                           do2d_xy_time_count(av), av
                          ENDIF
@@ -1023 +1024 @@
 #if defined( __netcdf )
                          IF ( netcdf_output  .AND.  myid == 0 )  THEN
-                            WRITE ( 22 )  simulated_time, &
+                            WRITE ( 22 )  time_since_reference_point, &
                                           do2d_xz_time_count(av), av
                          ENDIF
@@ -1324 +1325 @@
 #if defined( __netcdf )
                          IF ( netcdf_output  .AND.  myid == 0 )  THEN
-                            WRITE ( 23 )  simulated_time, &
+                            WRITE ( 23 )  time_since_reference_point, &
                                           do2d_yz_time_count(av), av
                          ENDIF