Changeset 807 for palm/trunk/SOURCE/local_stop.f90

Timestamp:

Jan 25, 2012 11:53:51 AM (12 years ago)

Author:

maronga

Message:

new utility check_namelist_files implemented

File:

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

palm/trunk/SOURCE/local_stop.f90

@@ -4 +4 @@
 ! Current revisions:
 ! -----------------
+! New cpp directive "__check" implemented which is used by check_namelist_files
 !
 ! Former revisions:
@@ -41 +42 @@
 
 
-#if defined( __parallel )
+#if defined( __parallel ) .AND. .NOT. defined ( __check )
     IF ( coupling_mode == 'uncoupled' )  THEN
        IF ( abort_mode == 1 )  THEN