Changeset 3045 for palm/trunk/SOURCE/chemistry_model_mod.f90

Timestamp:

May 28, 2018 7:55:41 AM (6 years ago)

Author:

Giersch

Message:

Code adjusted according to coding standards, renamed namelists, error messages revised until PA0347, output CASE 108 disabled

File:

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

palm/trunk/SOURCE/chemistry_model_mod.f90

@@ -27 +27 @@
 ! -----------------
 ! $Id$
+! error messages revised
+! 
+! 3014 2018-05-09 08:42:38Z maronga
 ! Bugfix: nzb_do and nzt_do were not used for 3d data output
 ! 
@@ -1134 +1137 @@
                  TRIM( data_output_pr(var_count) ) // ' is not imp' // &
                           'lemented for air_chemistry = .FALSE.'
-!                CALL message( 'check_parameters', 'PA0185', 1, 2, 0, 6, 0 )
+!                CALL message( 'check_parameters', 'PA0XXX', 1, 2, 0, 6, 0 )
           ELSE
              DO lsp = 1, nspec