Changeset 2305 for palm/trunk/SOURCE/lpm_read_restart_file.f90

Timestamp:

Jul 6, 2017 11:18:47 AM (7 years ago)

Author:

hoffmann

Message:

Improved calculation of particle IDs.

File:

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

palm/trunk/SOURCE/lpm_read_restart_file.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Improved calculation of particle IDs.
+! 
+! 2265 2017-06-08 16:58:28Z schwenkel
 ! Unused variables removed.
 ! 
@@ -122 +125 @@
                                    0.0_wp, 0.0_wp, 0.0_wp, 0.0_wp, 0.0_wp,  &
                                    0.0_wp, 0.0_wp, 0.0_wp, 0.0_wp, 0.0_wp,  &
-                                   0.0_wp, 0.0_wp, 0.0_wp, 0.0_wp, 0, 0, 0, &
-                                   0, .FALSE., -1)
+                                   0.0_wp, 0.0_wp, 0.0_wp, 0.0_wp,          &
+                                   0, 0, 0_idp, .FALSE., -1 )
 !
 !-- Read some particle parameters and the size of the particle arrays,