getrb Subroutine

public subroutine getrb(nc, ustar, nyl, diffh2o, reldiff, rb)


                                                                        *

Calculation of the quasilaminar sublayer resistance to dry deposition. * * AUTHOR: Andreas Stohl, 20 May 1995 * *


                                                                        *

Variables: * rb(ncmax) sublayer resistance * schmidt Schmidt number * ustar [m/s] friction velocity * diffh20 [m2/s] diffusivity of water vapor in air * reldiff diffusivity relative to H2O * * Constants: * karman von Karman constant * pr Prandtl number * *


Arguments

Type IntentOptional Attributes Name
integer :: nc
real :: ustar
real :: nyl
real :: diffh2o
real :: reldiff(maxspec)
real :: rb(maxspec)