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

palm/trunk/SOURCE/lpm_init.f90

@@ -20 +20 @@
 ! Current revisions:
 ! -----------------
-! 
+! Error messages revised
 ! 
 ! Former revisions:
@@ -338 +338 @@
        WRITE( message_string, * ) 'max_number_of_particle_groups =',           &
                                   max_number_of_particle_groups ,              &
-                                  ' number_of_particle_groups reset to ',      &
+                                  '&number_of_particle_groups reset to ',      &
                                   max_number_of_particle_groups
        CALL message( 'lpm_init', 'PA0213', 0, 1, 0, 6, 0 )