get_wetscav Subroutine

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 * *

                                                                        *

Variables: * cc [0-1] total cloud cover * convp [mm/h] convective precipitation rate * grfraction [0-1] fraction of grid, for which precipitation occurs * ix,jy indices of output grid cell for each particle * itime [s] actual simulation time [s] * jpart particle index * lfr, cfr area fraction covered by precipitation for large scale * and convective precipitation (dependent on prec. rate) * loutnext [s] time for which gridded deposition is next output * loutstep [s] interval at which gridded deposition is output * lsp [mm/h] large-scale precipitation rate * ltsample [s] interval over which mass is deposited * prec [mm/h] precipitation rate in subgrid, where precipitation occurs* wetgrid accumulated deposited mass on output grid * wetscav scavenging coefficient * * Constants: * *

*********

Arguments