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

palm/trunk/SOURCE/lpm_exchange_horiz.f90

@@ -20 +20 @@
 ! Current revisions:
 ! ------------------
-! 
+! Error messages revised
 ! 
 ! Former revisions:
@@ -1165 +1165 @@
                    THEN
                       WRITE( message_string, * )                               &
-                      'Particle violated CFL-criterion: particle with id ',    &
-                      particles(n)%id,' will be deleted!'   
+                      'Particle violated CFL-criterion: &particle with id ',   &
+                      particles(n)%id, ' will be deleted!'   
                       CALL message( 'lpm_check_cfl', 'PA0475', 0, 1, -1, 6, 0 )
                       particles(n)%particle_mask= .FALSE.