getrc Subroutine

public subroutine getrc(nc, i, j, t, gr, rh, rr, rc)

                                                                        *

Calculation of the surface resistance according to the procedure given * in: * Wesely (1989): Parameterization of surface resistances to gaseous * dry deposition in regional-scale numerical models. * Atmos. Environ. 23, 1293-1304. * * * AUTHOR: Andreas Stohl, 19 May 1995 * *

                                                                        *

Variables: * * reldiff(maxspec) diffusivity of H2O/diffusivity of component i * gr [W/m2] global radiation * i index of seasonal category * j index of landuse class * ldep(maxspec) 1, if deposition shall be calculated for species i * nc actual number of chemical components * rcl(maxspec,5,8) [s/m] Lower canopy resistance * rgs(maxspec,5,8) [s/m] Ground resistance * rlu(maxspec,5,8) [s/m] Leaf cuticular resistance * rm(maxspec) [s/m] Mesophyll resistance * t [C] temperature * *

Arguments