pkg_cld_sediment.F90 File Reference

Modules
module	pkg_cld_sediment

Functions/Subroutines
subroutine, public	pkg_cld_sediment::cld_sediment_readnl (nlfile)
subroutine, public	pkg_cld_sediment::cld_sediment_vel (ncol, icefrac, landfrac, ocnfrac, pmid, pdel, t, cloud, cldliq, cldice, pvliq, pvice, landm, snowh)
subroutine, public	pkg_cld_sediment::cld_sediment_tend (ncol, dtime, pint, pmid, pdel, t, cloud, cldliq, cldice, pvliq, pvice, liqtend, icetend, wvtend, htend, sfliq, sfice)
subroutine	pkg_cld_sediment::getflx (ncol, xw, phi, vel, deltat, flux)
subroutine	pkg_cld_sediment::cfint2 (ncol, x, f, fdot, xin, fxdot, fxdd, psistar)
subroutine	pkg_cld_sediment::cfdotmc_pro (ncol, x, f, fdot)

Variables
real(r8), parameter	pkg_cld_sediment::vland = 1.5_r8
real(r8), parameter	pkg_cld_sediment::vocean = 2.8_r8
real(r8), parameter	pkg_cld_sediment::mxsedfac = 0.99_r8
logical, parameter	pkg_cld_sediment::stokes = .true.
real(r8), parameter	pkg_cld_sediment::vice_small = 1._r8
real(r8), parameter	pkg_cld_sediment::eta = 1.7e-5_r8
real(r8), parameter	pkg_cld_sediment::r40 = 40._r8
real(r8), parameter	pkg_cld_sediment::r400 = 400._r8
real(r8), parameter	pkg_cld_sediment::v400 = 1.00_r8
real(r8)	pkg_cld_sediment::v40
real(r8)	pkg_cld_sediment::vslope
real(r8)	pkg_cld_sediment::cldsed_ice_stokes_fac = huge(1._r8)