wetdepo_mod Module


Uses


Subroutines

public subroutine wetdepo(itime, ltsample, loutnext)

Calculation of wet deposition using the concept of scavenging coefficients.* For lack of detailed information, washout and rainout are jointly treated. * It is assumed that precipitation does not occur uniformly within the whole * grid cell, but that only a fraction of the grid cell experiences rainfall. * This fraction is parameterized from total cloud cover and rates of large * scale and convective precipitation. * * Author: A. Stohl * * 1 December 1996 * * Correction by Petra Seibert, Sept 2002: * use centred precipitation data for integration * Code may not be correct for decay of deposition! * * 2021 Andreas Plach: - moved backward wet depo. calc. here from timemanager * - bugfix in-cloud scavenging * * PS, AP 2021: followed up on some variable renaming and * corrected get_wetscav subroutine parameter list *

Read more…

Arguments

Type IntentOptional Attributes Name
integer :: itime
integer :: ltsample
integer :: loutnext

public subroutine get_wetscav(itime, jpart, ks, gridfract, wetscav)

Calculation of wet deposition using the concept of scavenging coefficients.* For lack of detailed information, washout and rainout are jointly treated. * It is assumed that precipitation does not occur uniformly within the whole * grid cell, but that only a fraction of the grid cell experiences rainfall. * This fraction is parameterized from total cloud cover and rates of large * scale and convective precipitation. * * Author: A. Stohl * * 1 December 1996 * * Correction by Petra Seibert, Sept 2002: * use centred precipitation data for integration * Code may not be correct for decay of deposition! * * ZHG, for v10: use below-cloud scavenging according to Laakso et al (2003) * and Kyro et al (2009) as described in Grytte et al (2017, GMD) * * PS, AP 04/2019: - put back temporal interpolation of rain, from v10.01 * - tansferred BCSCHEME parameters to par_mod.f90 * - added call to rain interpolation subroutine with new * interpolation for rain and all cloud params * - cleaned up scavenging determination algorithm * - added new below-cloud scavenging scheme * *

Read more…

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: itime
integer, intent(in) :: jpart
integer, intent(in) :: ks
real, intent(out) :: gridfract
real, intent(out) :: wetscav

public subroutine get_wetscav_belowcld_gas(ks, prec, wetscav)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: ks
real, intent(in) :: prec
real, intent(out) :: wetscav

public subroutine get_wetscav_belowcld_aerosol_rain(ks, prec, wetscav)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: ks
real, intent(in) :: prec
real, intent(out) :: wetscav

public subroutine get_wetscav_belowcld_aerosol_snow(ks, prec, wetscav)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: ks
real, intent(in) :: prec
real, intent(out) :: wetscav

public subroutine get_wetscav_incld_aerosol(ks, gridfract, prec, cl, cc, t_particle, wetscav)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: ks
real, intent(in) :: gridfract
real, intent(in) :: prec
real, intent(inout) :: cl
real, intent(in) :: cc
real, intent(in) :: t_particle
real, intent(out) :: wetscav

public subroutine get_wetscav_incld_gas(ks, gridfract, prec, cl, cc, t_particle, wetscav)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: ks
real, intent(in) :: gridfract
real, intent(in) :: prec
real, intent(inout) :: cl
real, intent(in) :: cc
real, intent(in) :: t_particle
real, intent(out) :: wetscav

public subroutine get_activated_frac(ks, t_particle, frac_act)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: ks
real, intent(in) :: t_particle
real, intent(out) :: frac_act

public subroutine get_gridfract(lsp, convp, cc, gridfract)

Read more…

Arguments

Type IntentOptional Attributes Name
real, intent(in) :: lsp
real, intent(in) :: convp
real, intent(in) :: cc
real, intent(out) :: gridfract

public subroutine get_cloud_liquid(gridfract, prec, cc, cl)

Arguments

Type IntentOptional Attributes Name
real, intent(in) :: gridfract
real, intent(in) :: prec
real, intent(in) :: cc
real, intent(inout) :: cl

public subroutine wetdepokernel(nunc, deposit, x, y, nage, kp, thread)

Variables: * * nunc uncertainty class of the respective particle * nage age class of the respective particle * deposit amount (kg) to be deposited * *

Read more…

Arguments

Type IntentOptional Attributes Name
integer :: nunc
real :: deposit(maxspec)
real :: x
real :: y
integer :: nage
integer :: kp
integer, intent(in) :: thread

public subroutine wetdepokernel_nest(nunc, deposit, x, y, nage, kp, thread)

Variables: * * nunc uncertainty class of the respective particle * nage age class of the respective particle * deposit amount (kg) to be deposited * *

Read more…

Arguments

Type IntentOptional Attributes Name
integer :: nunc
real :: deposit(maxspec)
real :: x
real :: y
integer :: nage
integer :: kp
integer, intent(in) :: thread

public subroutine writeprecip(itime, imem)

This routine produces a file containing total precipitation for each * releases point. * * Author: S. Eckhardt * 7 Mai 2017 *

Read more…

Arguments

Type IntentOptional Attributes Name
integer :: itime
integer :: imem