Changeset 2123 for palm

Timestamp:

Jan 18, 2017 12:34:59 PM (8 years ago)

Author:

hoffmann

Message:

last commit documented

Location:

palm/trunk/SOURCE

Files:

• lpm_data_output_particles.f90 (modified) (1 diff)
• lpm_droplet_collision.f90 (modified) (1 diff)
• lpm_init.f90 (modified) (2 diffs)
• lpm_set_attributes.f90 (modified) (1 diff)
• mod_particle_attributes.f90 (modified) (1 diff)

palm/trunk/SOURCE/lpm_data_output_particles.f90

@@ -20 +20 @@
 ! Current revisions:
 ! ------------------
-! Calculation of particle ID
+!
 ! 
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 2122 2017-01-18 12:22:54Z hoffmann
+! Calculation of particle ID
 !
 ! 2000 2016-08-20 18:09:15Z knoop

palm/trunk/SOURCE/lpm_droplet_collision.f90

@@ -20 +20 @@
 ! Current revisions:
 ! ------------------
-! Some reformatting of the code.
+!
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 2122 2017-01-18 12:22:54Z hoffmann
+! Some reformatting of the code.
 !
 ! 2000 2016-08-20 18:09:15Z knoop

palm/trunk/SOURCE/lpm_init.f90

@@ -20 +20 @@
 ! Current revisions:
 ! -----------------
-! Improved initialization of equilibrium aerosol radii 
-! Calculation of particle ID
+!
 ! 
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 2122 2017-01-18 12:22:54Z hoffmann
+! Improved initialization of equilibrium aerosol radii 
+! Calculation of particle ID
 !
 ! 2000 2016-08-20 18:09:15Z knoop
@@ -236 +239 @@
 !-- Define MPI derived datatype for FORTRAN datatype particle_type (see module
 !-- particle_attributes). Integer length is 4 byte, Real is 8 byte
-!    blocklengths(1)  = 20;  blocklengths(2)  =   5;  blocklengths(3)  =   1
-!    displacements(1) =  0;  displacements(2) = 160;  displacements(3) = 180
     blocklengths(1)  = 19;  blocklengths(2)  =   6;  blocklengths(3)  =   1
     displacements(1) =  0;  displacements(2) = 152;  displacements(3) = 176
-
-!
-!-- WARNING: the double precision integer 'id' is treated as a double precision 
-!-- integer here, i.e., there are 20 real variables and only 5 integer variables 
-!-- instead of 19 and 6, respectively. 
 
     types(1) = MPI_REAL

palm/trunk/SOURCE/lpm_set_attributes.f90

@@ -20 +20 @@
 ! Current revisions:
 ! -----------------
-! DVRP routine removed
+!
 ! 
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 2122 2017-01-18 12:22:54Z hoffmann
+! DVRP routine removed
 !
 ! 2000 2016-08-20 18:09:15Z knoop

palm/trunk/SOURCE/mod_particle_attributes.f90

@@ -20 +20 @@
 ! Current revisions:
 ! ------------------
-! Calculation of particle ID
-! Particle attribute dvrp_psize renamed to user: this attribute can be used by
-! by the user to store any variable
+!
 ! 
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 2122 2017-01-18 12:22:54Z hoffmann
+! Calculation of particle ID
+! Particle attribute dvrp_psize renamed to user: this attribute can be used by
+! by the user to store any variable
 !
 ! 2000 2016-08-20 18:09:15Z knoop