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

Timestamp:

Apr 15, 2016 11:46:09 AM (8 years ago)

Author:

hoffmann

Message:

initialization of aerosol spectra added

File:

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

palm/trunk/SOURCE/package_parin.f90

@@ -19 +19 @@
 ! Current revisions:
 ! -----------------
-! 
+! Initialization of aerosols added.
 ! 
 ! Former revisions:
@@ -151 +151 @@
         ONLY:  alloc_factor, bc_par_b, bc_par_lr, bc_par_ns, bc_par_t,         &
                collision_algorithm, collision_kernel,                          &
-               curvature_solution_effects, density_ratio,                      &
-               dissipation_classes, dt_min_part, dt_prel,                      &
-               dt_write_particle_data,                                         &
+               curvature_solution_effects, density_ratio, dissipation_classes, &
+               dt_min_part, dt_prel, dt_write_particle_data,                   &
                end_time_prel, initial_weighting_factor,                        &
-               min_nr_particle, number_of_particle_groups, particles_per_point,&
-               particle_advection, particle_advection_start, pdx, pdy, pdz,    &
-               psb, psl, psn, psr, pss, pst, radius, radius_classes,           &
-               random_start_position, read_particles_from_restartfile,         &
-               seed_follows_topography, use_sgs_for_particles,                 &
+               init_aerosol_probabilistic, min_nr_particle,                    &
+               monodisperse_aerosols, n1, n2, n3, number_of_particle_groups,   &
+               particles_per_point, particle_advection,                        &
+               particle_advection_start,                                       &
+               pdx, pdy, pdz, psb, psl, psn, psr, pss, pst, radius,            &
+               radius_classes, random_start_position,                          &
+               read_particles_from_restartfile, rm1, rm2, rm3,                 &
+               seed_follows_topography, s1, s2, s3, use_sgs_for_particles,     &
                vertical_particle_advection, write_particle_statistics
 
@@ -191 +193 @@
                                   dt_write_particle_data,                      &
                                   end_time_prel, initial_weighting_factor,     &
-                                  min_nr_particle,                             &
-                                  number_of_particle_groups,                   &
+                                  init_aerosol_probabilistic,                  &
+                                  min_nr_particle, monodisperse_aerosols,      &
+                                  n1, n2, n3, number_of_particle_groups,       &
                                   particles_per_point,                         &
                                   particle_advection_start,                    &
@@ -199 +202 @@
                                   radius_classes, random_start_position,       &
                                   read_particles_from_restartfile,             &
-                                  seed_follows_topography,                     &
+                                  rm1, rm2, rm3,                               &
+                                  seed_follows_topography, s1, s2, s3,         &
                                   use_sgs_for_particles,                       &
                                   vertical_particle_advection,                 &