Changeset 2263 for palm/trunk/SOURCE/package_parin.f90

Timestamp:

Jun 8, 2017 2:59:01 PM (7 years ago)

Author:

schwenkel

Message:

Implemented splitting and merging algorithm

File:

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

palm/trunk/SOURCE/package_parin.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Implemented splitting and merging algorithm
+! 
+! 2183 2017-03-17 14:29:15Z schwenkel
 !
 ! 2182 2017-03-17 14:27:40Z schwenkel
@@ -167 +170 @@
                dissipation_classes, dt_min_part, dt_prel,                      &
                dt_write_particle_data, end_time_prel, initial_weighting_factor,&
-               init_aerosol_probabilistic, min_nr_particle,                    &
-               monodisperse_aerosols, n1, n2, n3, number_concentration,        & 
-               number_of_particle_groups, number_particles_per_gridbox,        &
-               particles_per_point, particle_advection,                        &
-               particle_advection_start,                                       &
-               pdx, pdy, pdz, psb, psl, psn, psr, pss, pst, radius,            &
-               radius_classes, random_start_position,                          &
+               init_aerosol_probabilistic, max_number_particles_per_gridbox,   & 
+               merging, min_nr_particle, monodisperse_aerosols, n1, n2, n3,    &
+               number_concentration, number_of_particle_groups,                &
+               number_particles_per_gridbox, particles_per_point,              &
+               particle_advection, particle_advection_start, pdx, pdy, pdz,    &
+               psb, psl, psn, psr, pss, pst, radius, radius_classes,           &
+               radius_merge, radius_split, random_start_position,              &
                read_particles_from_restartfile, rm1, rm2, rm3,                 &
-               seed_follows_topography, step_dealloc, s1, s2, s3,              &
-               use_sgs_for_particles, vertical_particle_advection,             &
-               write_particle_statistics
+               seed_follows_topography, splitting, splitting_factor,           & 
+               splitting_factor_max, splitting_function, splitting_mode,       &
+               step_dealloc, s1, s2, s3, use_sgs_for_particles,                &
+               vertical_particle_advection, weight_factor_merge,               &
+               weight_factor_split, write_particle_statistics                
 
     IMPLICIT NONE
@@ -210 +215 @@
                                   end_time_prel, initial_weighting_factor,     &
                                   init_aerosol_probabilistic,                  &
+                                  max_number_particles_per_gridbox, merging,   &
                                   min_nr_particle, monodisperse_aerosols,      &
                                   n1, n2, n3, number_concentration,            &
@@ -218 +224 @@
                                   particle_maximum_age, pdx, pdy, pdz, psb,    &
                                   psl, psn, psr, pss, pst, radius,             &
-                                  radius_classes, random_start_position,       &
+                                  radius_classes, radius_merge, radius_split,  &   
+                                  random_start_position,                       &
                                   read_particles_from_restartfile,             &
                                   rm1, rm2, rm3,                               &
-                                  seed_follows_topography, step_dealloc,       &
-                                  s1, s2, s3, use_sgs_for_particles,           &
+                                  seed_follows_topography,                     &
+                                  splitting, splitting_factor,                 &
+                                  splitting_factor_max, splitting_function,    &
+                                  splitting_mode, step_dealloc, s1, s2, s3,    &
+                                  use_sgs_for_particles,                       &
                                   vertical_particle_advection,                 &
+                                  weight_factor_merge, weight_factor_split,    &
                                   write_particle_statistics