Changeset 4188 for palm/trunk/SOURCE/radiation_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/radiation_model_mod.f90 (modified) (2 diffs)

palm/trunk/SOURCE/radiation_model_mod.f90

@@ -28 +28 @@
 ! -----------------
 ! $Id$
+! Minor adjustment in error message
+! 
+! 4187 2019-08-26 12:43:15Z suehring
 ! - Take external radiation from root domain dynamic input if not provided for 
 !   each nested domain
@@ -2473 +2476 @@
                               'dynamic input for the child domain(s) is ' //   &
                               'provided, at least one for the root domain ' // &
-                              'needs to be provided.'
+                              'is needed.'
              CALL message( 'radiation_init', 'PA0315', 1, 2, 0, 6, 0 )
           ENDIF