Changeset 790 for palm/trunk/SOURCE/modules.f90

Timestamp:

Nov 29, 2011 3:11:20 AM (12 years ago)

Author:

raasch

Message:

Bugfix for output of mean particle radius + preliminary works for implementing the Wang collision kernel

File:

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

palm/trunk/SOURCE/modules.f90

@@ -5 +5 @@
 ! Current revisions:
 ! -----------------
-! 
+! +turbulence_effects_on_collision, wang_collision_kernel
 !
 ! Former revisions:
@@ -1170 +1170 @@
     INTEGER, DIMENSION(:,:,:), ALLOCATABLE ::  prt_count, prt_start_index
 
-    LOGICAL ::  particle_advection = .FALSE., random_start_position = .FALSE., &
+    LOGICAL ::  turbulence_effects_on_collision = .FALSE.,                     &
+                particle_advection = .FALSE., random_start_position = .FALSE., &
                 read_particles_from_restartfile = .TRUE.,                      &
                 uniform_particles = .TRUE., use_particle_tails = .FALSE.,      &
                 use_sgs_for_particles = .FALSE.,                               &
+                wang_collision_kernel = .FALSE.,                               &
                 write_particle_statistics = .FALSE.