Changeset 828 for palm/trunk/SOURCE/check_parameters.f90

Timestamp:

Feb 21, 2012 12:00:36 PM (13 years ago)

Author:

raasch

Message:

New:
---

Changed:

---

Optimization of collision kernels. Collision tables can be calculated once at
simulation start for defined radius (and dissipation) classes instead of
re-calculating them at every timestep and for the particle ensemble in
every gridbox.
For this purpose the particle feature color is renamed class.
New parpar parameters radius_classes and dissipation_classes.
(Makefile, advec_particles, check_parameters, data_output_dvrp, header, init_particles, lpm_collision_kernels, modules, package_parin, set_particle_attributes)

Lower limit for droplet radius changed from 1E-7 to 1E-8.
(advec_particles)

Complete re-formatting of collision code (including changes in names of
variables, modules and subroutines).
(advec_particles, lpm_collision_kernels)

Errors:

---

Bugfix: transformation factor for dissipation changed from 1E5 to 1E4
(advec_particles, lpm_collision_kernels)

File:

• palm/trunk/SOURCE/check_parameters.f90 (modified) (4 diffs)

palm/trunk/SOURCE/check_parameters.f90

@@ -4 +4 @@
 ! Current revisions:
 ! -----------------
-! 
+! check of collision_kernel extended
 !
 ! Former revisions:
@@ -716 +716 @@
     SELECT CASE ( TRIM( collision_kernel ) )
 
-       CASE ( 'hall' )
+       CASE ( 'hall', 'hall_fast' )
           hall_kernel = .TRUE.
 
@@ -722 +722 @@
           palm_kernel = .TRUE.
 
-       CASE ( 'wang' )
+       CASE ( 'wang', 'wang_fast' )
           wang_kernel = .TRUE.
 
@@ -734 +734 @@
 
     END SELECT
+    IF ( collision_kernel(6:9) == 'fast' )  use_kernel_tables = .TRUE.