Changeset 4331 for palm/trunk/SOURCE/check_parameters.f90

Timestamp:

Dec 10, 2019 6:25:02 PM (4 years ago)

Author:

suehring

Message:

New diagnostic output for 10-m wind speed; Diagnostic output of 2-m potential temperature moved to diagnostic output

File:

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

palm/trunk/SOURCE/check_parameters.f90

@@ -25 +25 @@
 ! -----------------
 ! 4172 2019-08-20 11:55:33Z oliver.maas
+! Move 2-m potential temperature output to diagnostic_output_quantities
+! 
+! 11:55:33Z oliver.maas
 ! removed message PA0421, concerning old parameter recycling_yshift
 ! 
@@ -2385 +2388 @@
 
           CASE ( 'ghf*', 'lwp*', 'ol*', 'qsws*', 'r_a*',                       &
-                 'shf*', 'ssws*', 't*', 'theta_2m*', 'tsurf*', 'us*',          &
+                 'shf*', 'ssws*', 't*', 'tsurf*', 'us*',                       &
                  'z0*', 'z0h*', 'z0q*' )
              IF ( k == 0  .OR.  data_output(i)(ilen-2:ilen) /= '_xy' )  THEN
@@ -2424 +2427 @@
                                  'res passive_scalar = .TRUE.'
                 CALL message( 'check_parameters', 'PA0361', 1, 2, 0, 6, 0 )
-             ENDIF
-!
-!--          Activate calculation of 2m temperature if output is requested
-             IF ( TRIM( var ) == 'theta_2m*' )  THEN
-                do_output_at_2m = .TRUE.
-                unit = 'K'
              ENDIF