Changeset 2689 for palm

Timestamp:

Dec 12, 2017 5:46:55 PM (7 years ago)

Author:

Giersch

Message:

Bugfix in if query.

File:

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

palm/trunk/SOURCE/check_parameters.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Bugfix in if query
+! 
+! 2688 2017-12-12 17:27:04Z Giersch
 ! Check if humidity is set to TRUE in the _p3d file for coupled runs
 ! 
@@ -651 +654 @@
 !
 !-- Check if humidity is set to TRUE in case of the atmospheric run (for coupled runs)
-    IF ( coupling_mode == 'atmosphere_to_ocean' .AND. humidity == .FALSE.) THEN
+    IF ( coupling_mode == 'atmosphere_to_ocean' .AND. .NOT. humidity) THEN
        message_string = ' Humidity has to be set to .T. in the _p3d file for ' //      &
                         'coupled runs between ocean and atmosphere.'