Changeset 3046 for palm/trunk/SOURCE/check_for_restart.f90

Timestamp:

May 29, 2018 8:02:15 AM (6 years ago)

Author:

Giersch

Message:

Remaining error messages revised, comments extended

File:

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

palm/trunk/SOURCE/check_for_restart.f90

@@ -20 +20 @@
 ! Current revisions:
 ! -----------------
-! 
+! Error messages revised
 ! 
 ! Former revisions:
@@ -144 +144 @@
     IF ( terminate_run  .AND.  myid == 0 )  THEN
        WRITE( message_string, * ) 'run will be terminated because it is ',     &
-                       'running out of job cpu limit, ',                       &
-                       'remaining time:         ', remaining_time, ' s',       &
+                       'running out of job cpu limit & ',                      &
+                       'remaining time:         ', remaining_time, ' s &',     &
                        'termination time needed:', termination_time_needed, ' s'
        CALL message( 'check_for_restart', 'PA0163', 0, 1, 0, 6, 0 )
@@ -187 +187 @@
                                   'forced a job finalization using a flag',    &
                                   'file:',                                     &
-                                  ' DO_STOP_NOW: ', do_stop_now,               &
-                                  ' DO_RESTART_NOW: ', do_restart_now 
+                                  '&DO_STOP_NOW: ', do_stop_now,               &
+                                  '&DO_RESTART_NOW: ', do_restart_now 
           CALL message( 'check_for_restart', 'PA0398', 0, 0, 0, 6, 0 )