CAM
molec_diff.F90 File Reference

Modules

module  molec_diff
 

Functions/Subroutines

subroutine, public molec_diff::init_molec_diff (kind, ncnst, rair_in, mw_dry_in, n_avog_in, gravit_in, cpair_in, kbtz_in, errstring)
 
subroutine, public molec_diff::init_timestep_molec_diff (pbuf2d, state)
 
integer function, public molec_diff::compute_molec_diff (lchnk, pcols, pver, ncnst, ncol, t, pmid, pint, zi, ztodt, kvm, kvt, tint, rhoi, tmpi2, kq_scal, ubc_t, ubc_mmr, ubc_flux, dse_top, cc_top, cd_top, cnst_mw_out, cnst_fixed_ubc_out, cnst_fixed_ubflx_out, mw_fac_out, ntop_molec_out, nbot_molec_out, kvt_returned)
 
integer function, public molec_diff::vd_lu_qdecomp (pcols, pver, ncol, fixed_ubc, mw, ubc_mmr, kv, kq_scal, mw_facm, tmpi, rpdel, decomp, rhoi, tint, ztodt, ntop_molec, nbot_molec, cd_top, lchnk, pmid, pint, t, m)
 

Variables

integer, parameter molec_diff::r8 = selected_real_kind(12)
 
real(r8), parameter molec_diff::km_fac = 3.55E-7_r8
 
real(r8), parameter molec_diff::pr_num = 1._r8
 
real(r8), parameter molec_diff::pwr = 2._r8/3._r8
 
real(r8), parameter molec_diff::d0 = 1.52E20_r8
 
real(r8) molec_diff::rair
 
real(r8) molec_diff::mw_dry
 
real(r8) molec_diff::n_avog
 
real(r8) molec_diff::gravit
 
real(r8) molec_diff::cpair
 
real(r8) molec_diff::kbtz
 
real(r8), dimension(:), allocatable molec_diff::mw_fac
 
real(r8), dimension(:), allocatable molec_diff::alphath