Changeset 3454 for palm

Timestamp:

Oct 30, 2018 2:02:30 PM (6 years ago)

Author:

schwenkel

Message:

Bugfix: Missing air_chemistry statement for profile check

File:

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

palm/trunk/SOURCE/check_parameters.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Bugfix: Missing air_chemistry statement for profile check
+! 
+! 3452 2018-10-30 13:13:34Z schwenkel
 ! Bugfix for profiles output
 ! 
@@ -2925 +2928 @@
              ENDIF
 
-             IF ( unit == 'illegal' )  THEN
+             IF ( unit == 'illegal' .AND.  air_chemistry )  THEN
                 CALL chem_check_data_output_pr( data_output_pr(i), i, unit,    &
                                                 dopr_unit(i) )