Changeset 4188 for palm/trunk/SOURCE/plant_canopy_model_mod.f90

Timestamp:

Aug 26, 2019 2:15:47 PM (5 years ago)

Author:

suehring

Message:

Minor adjustments in error messages and error numbers. Some typos are corrected.

File:

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

palm/trunk/SOURCE/plant_canopy_model_mod.f90

@@ -27 +27 @@
 ! -----------------
 ! $Id$
+! Minor adjustment in error number
+! 
+! 4187 2019-08-26 12:43:15Z suehring
 ! Give specific error numbers instead of PA0999
 ! 
@@ -433 +436 @@
                            TRIM( coupling_char ) // ' requires ' //            &
                            'canopy_mode = read_from_file_3d'
-          CALL message( 'pcm_check_parameters', 'PA0673', 1, 2, 0, 6, 0 )
+          CALL message( 'pcm_check_parameters', 'PA0672', 1, 2, 0, 6, 0 )
        ENDIF