Functions | |
subroutine | kernel_golovin (v1, v2, env_state, k) |
Golovin (additive) coagulation kernel. | |
subroutine | soln_golovin_exp (bin_grid, aero_data, time, num_den, mean_radius, rho_p, aero_dist_init, env_state, aero_binned) |
Exact solution with the Golovin coagulation kernel and exponential initial condition. | |
subroutine | bessi1 (x, r) |
Modified Bessel function of the first kind ![]() |
subroutine pmc_kernel_golovin::bessi1 | ( | real*8,intent(in) | x, | |
real*8,intent(out) | r | |||
) |
Modified Bessel function of the first kind .
This looks like it was taken from Numerical Recipes.
FIXME: Where did this come from? What license does it have?
x | Function argument. |
r | Function value. |
subroutine pmc_kernel_golovin::kernel_golovin | ( | real*8,intent(in) | v1, | |
real*8,intent(in) | v2, | |||
type(env_state_t),intent(in) | env_state, | |||
real*8,intent(out) | k | |||
) |
Golovin (additive) coagulation kernel.
v1 | Volume of first particle. |
v2 | Volume of second particle. |
env_state | Environment state. |
k | Coagulation kernel. |
subroutine pmc_kernel_golovin::soln_golovin_exp | ( | type(bin_grid_t),intent(in) | bin_grid, | |
type(aero_data_t),intent(in) | aero_data, | |||
real*8,intent(in) | time, | |||
real*8,intent(in) | num_den, | |||
real*8,intent(in) | mean_radius, | |||
real*8,intent(in) | rho_p, | |||
type(aero_dist_t),intent(in) | aero_dist_init, | |||
type(env_state_t),intent(in) | env_state, | |||
type(aero_binned_t),intent(out) | aero_binned | |||
) |
Exact solution with the Golovin coagulation kernel and exponential initial condition.
bin_grid | Bin grid. |
aero_data | Aerosol data. |
time | Current time. |
num_den | Particle number concentration (#/m^3). |
mean_radius | Mean init radius (m). |
rho_p | Particle density (kg/m^3). |
aero_dist_init | Initial distribution. |
env_state | Environment state. |
aero_binned | Output state. |