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

Timestamp:

Oct 24, 2018 6:39:32 PM (6 years ago)

Author:

gronemeier

Message:

new surface-data output; renamed output variables (pt to theta, rho_air to rho, rho_ocean to rho_sea_water)

File:

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

palm/trunk/SOURCE/data_output_dvrp.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Renamed output variables
+! 
+! 3419 2018-10-24 17:27:31Z gronemeier
 ! Modularization of all bulk cloud physics code components
 ! 
@@ -337 +340 @@
                    ENDDO
 
-                CASE ( 'pt', 'pt_xy', 'pt_xz', 'pt_yz' )
+                CASE ( 'theta', 'theta_xy', 'theta_xz', 'theta_yz' )
                    IF ( .NOT. bulk_cloud_model ) THEN
                       DO  i = nxl_dvrp, nxr_dvrp+1
@@ -409 +412 @@
                    ENDIF
 
-                CASE ( 'u*_xy' )
+                CASE ( 'us*_xy' )
                    DO  i = nxl_dvrp, nxr_dvrp+1
                       DO  j = nys_dvrp, nyn_dvrp+1