Changeset 75 for palm/trunk/SOURCE/data_output_dvrp.f90

Timestamp:

Mar 22, 2007 9:54:05 AM (17 years ago)

Author:

raasch

Message:

preliminary update for changes concerning non-cyclic boundary conditions

File:

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

palm/trunk/SOURCE/data_output_dvrp.f90

@@ -32 +32 @@
 ! Actual revisions:
 ! -----------------
-! Particles-package is now part of the default code.
+! Particles-package is now part of the default code,
+! moisture renamed humidity
 ! TEST: write statements
 !
@@ -391 +392 @@
 
              CASE ( 'q', 'q_xy', 'q_xz', 'q_yz' )
-                IF ( moisture  .OR.  passive_scalar )  THEN
+                IF ( humidity  .OR.  passive_scalar )  THEN
                    DO  i = nxl, nxr+1
                       DO  j = nys, nyn+1
@@ -401 +402 @@
                 ELSE
                    IF ( myid == 0 )  THEN
-                      PRINT*, '+++ data_output_dvrp: if moisture/passive_scalar = ', & 
+                      PRINT*, '+++ data_output_dvrp: if humidity/passive_scalar = ', & 
                               'FALSE output of ', output_variable,            &
                               'is not provided'