Changeset 841 for palm/trunk/SOURCE/user_parin.f90

Timestamp:

Feb 28, 2012 12:29:49 PM (12 years ago)

Author:

maronga

Message:

further adjustments and bugfixes for the namelist file check

File:

• palm/trunk/SOURCE/user_parin.f90 (modified) (3 diffs)

palm/trunk/SOURCE/user_parin.f90

@@ -4 +4 @@
 ! Current revisions:
 ! -----------------
-! 
+! Bugfix: disable max_pr_user check during prior namelist file check
 !
 ! Former revisions:
@@ -83 +83 @@
 !-- restart file (already stored in max_pr_user) has to match the one given
 !-- for the current run
+#if ! defined ( __check )
     IF ( TRIM( initializing_actions ) == 'read_restart_data' )  THEN
        IF ( max_pr_user /= max_pr_user_tmp )  THEN
@@ -95 +96 @@
        max_pr_user = max_pr_user_tmp
     ENDIF
+#endif
 
 100 RETURN