|
| subroutine, public | eddy_diff::init_eddy_diff (kind, pver, gravx, cpairx, rairx, zvirx, latvapx, laticex, ntop_eddy, nbot_eddy, vkx, eddy_lbulk_max, eddy_leng_max, eddy_max_bot_pressure, eddy_moist_entrain_a2l) |
| |
| subroutine, public | eddy_diff::compute_eddy_diff (lchnk, pcols, pver, ncol, t, qv, ztodt, ql, qi, s, rpdel, cldn, qrl, wsedl, z, zi, pmid, pi, u, v, taux, tauy, shflx, qflx, wstarent, nturb, rrho, ustar, pblh, kvm_in, kvh_in, kvm_out, kvh_out, kvq, cgh, cgs, tpert, qpert, wpert, tke, bprod, sprod, sfi, kvinit, tauresx, tauresy, ksrftms, ipbl, kpblh, wstarPBL, tkes, went, turbtype, sm_aw) |
| |
| subroutine | eddy_diff::sfdiag (pcols, pver, ncol, qt, ql, sl, pi, pm, zi, cld, sfi, sfuh, sflh, slslope, qtslope) |
| |
| subroutine | eddy_diff::trbintd (pcols, pver, ncol, z, u, v, t, pmid, s2, n2, ri, zi, pi, cld, qt, qv, ql, qi, sfi, sfuh, sflh, sl, slv, slslope, qtslope, chs, chu, cms, cmu) |
| |
| subroutine | eddy_diff::austausch_atm (pcols, pver, ncol, ri, s2, kvf) |
| |
| subroutine | eddy_diff::caleddy (pcols, pver, ncol, sl, qt, ql, slv, u, v, pi, z, zi, qflx, shflx, slslope, qtslope, chu, chs, cmu, cms, sfuh, sflh, n2, s2, ri, rrho, pblh, ustar, kvh_in, kvm_in, kvh, kvm, tpert, qpert, qrlin, kvf, tke, wstarent, bprod, sprod, minpblh, wpert, tkes, went, turbtype, sm_aw, kbase_o, ktop_o, ncvfin_o, kbase_mg, ktop_mg, ncvfin_mg, kbase_f, ktop_f, ncvfin_f, wet_CL, web_CL, jtbu_CL, jbbu_CL, evhc_CL, jt2slv_CL, n2ht_CL, n2hb_CL, lwp_CL, opt_depth_CL, radinvfrac_CL, radf_CL, wstar_CL, wstar3fact_CL, ebrk, wbrk, lbrk, ricl, ghcl, shcl, smcl, gh_a, sh_a, sm_a, ri_a, leng, wcap, pblhp, cld, ipbl, kpblh, wsedl, wsed_CL) |
| |
| subroutine | eddy_diff::exacol (pcols, pver, ncol, ri, bflxs, minpblh, zi, ktop, kbase, ncvfin) |
| |
| subroutine | eddy_diff::zisocl (pcols, pver, long, z, zi, n2, s2, bprod, sprod, bflxs, tkes, ncvfin, kbase, ktop, belongcv, ricl, ghcl, shcl, smcl, lbrk, wbrk, ebrk, extend, extend_up, extend_dn) |
| |
| real(r8) function | eddy_diff::compute_cubic (a, b, c) |
| |
|
| type(vdiff_selector) | eddy_diff::fieldlist_wet |
| |
| type(vdiff_selector) | eddy_diff::fieldlist_molec |
| |
| integer, parameter | eddy_diff::r8 = selected_real_kind(12) |
| |
| integer, parameter | eddy_diff::i4 = selected_int_kind( 6) |
| |
| character, parameter | eddy_diff::sftype = 'l' |
| |
| character(len=4), parameter | eddy_diff::choice_evhc = 'maxi' |
| |
| character(len=6), parameter | eddy_diff::choice_radf = 'maxi' |
| |
| character(len=6), parameter | eddy_diff::choice_srcl = 'nonamb' |
| |
| character(len=6), parameter | eddy_diff::choice_tunl = 'rampcl' |
| |
| real(r8), parameter | eddy_diff::ctunl = 2._r8 |
| |
| character(len=6), parameter | eddy_diff::choice_leng = 'origin' |
| |
| real(r8), parameter | eddy_diff::cleng = 3._r8 |
| |
| character(len=6), parameter | eddy_diff::choice_tkes = 'ibprod' |
| |
| real(r8) | eddy_diff::lbulk_max = 40.e3_r8 |
| |
| real(r8), dimension(pver) | eddy_diff::leng_max = 40.e3_r8 |
| |
| logical, parameter | eddy_diff::id_sedfact = .false. |
| |
| real(r8), parameter | eddy_diff::ased = 9._r8 |
| |
| real(r8), parameter | eddy_diff::a1l = 0.10_r8 |
| |
| real(r8), parameter | eddy_diff::a1i = 0.2_r8 |
| |
| real(r8), parameter | eddy_diff::ccrit = 0.5_r8 |
| |
| real(r8), parameter | eddy_diff::wstar3factcrit = 0.5_r8 |
| |
| real(r8) | eddy_diff::a2l |
| |
| real(r8), parameter | eddy_diff::a3l = 0.8_r8 |
| |
| real(r8), parameter | eddy_diff::jbumin = .001_r8 |
| |
| real(r8), parameter | eddy_diff::evhcmax = 10._r8 |
| |
| real(r8), parameter | eddy_diff::onet = 1._r8/3._r8 |
| |
| integer, parameter | eddy_diff::ncvmax = pver |
| |
| real(r8), parameter | eddy_diff::qmin = 1.e-5_r8 |
| |
| real(r8), parameter | eddy_diff::ntzero = 1.e-12_r8 |
| |
| real(r8), parameter | eddy_diff::b1 = 5.8_r8 |
| |
| real(r8) | eddy_diff::b123 |
| |
| real(r8), parameter | eddy_diff::tunl = 0.085_r8 |
| |
| real(r8), parameter | eddy_diff::alph1 = 0.5562_r8 |
| |
| real(r8), parameter | eddy_diff::alph2 = -4.3640_r8 |
| |
| real(r8), parameter | eddy_diff::alph3 = -34.6764_r8 |
| |
| real(r8), parameter | eddy_diff::alph4 = -6.1272_r8 |
| |
| real(r8), parameter | eddy_diff::alph5 = 0.6986_r8 |
| |
| real(r8), parameter | eddy_diff::ricrit = 0.19_r8 |
| |
| real(r8), parameter | eddy_diff::ae = 1._r8 |
| |
| real(r8), parameter | eddy_diff::rinc = -0.04_r8 |
| |
| real(r8), parameter | eddy_diff::wpertmin = 1.e-6_r8 |
| |
| real(r8), parameter | eddy_diff::wfac = 1._r8 |
| |
| real(r8), parameter | eddy_diff::tfac = 1._r8 |
| |
| real(r8), parameter | eddy_diff::fak = 8.5_r8 |
| |
| real(r8), parameter | eddy_diff::rcapmin = 0.1_r8 |
| |
| real(r8), parameter | eddy_diff::rcapmax = 2.0_r8 |
| |
| real(r8), parameter | eddy_diff::tkemax = 20._r8 |
| |
| real(r8), parameter | eddy_diff::lambda = 0.5_r8 |
| |
| logical, parameter | eddy_diff::use_kvf = .false. |
| |
| logical, parameter | eddy_diff::use_dw_surf = .true. |
| |
| logical, parameter | eddy_diff::set_qrlzero = .false. |
| |
| real(r8), parameter | eddy_diff::pblmaxp = 4.e4_r8 |
| |
| real(r8), parameter | eddy_diff::zkmin = 0.01_r8 |
| |
| real(r8), parameter | eddy_diff::betam = 15.0_r8 |
| |
| real(r8), parameter | eddy_diff::betas = 5.0_r8 |
| |
| real(r8), parameter | eddy_diff::betah = 15.0_r8 |
| |
| real(r8), parameter | eddy_diff::fakn = 7.2_r8 |
| |
| real(r8), parameter | eddy_diff::ricr = 0.3_r8 |
| |
| real(r8), parameter | eddy_diff::sffrac = 0.1_r8 |
| |
| real(r8), parameter | eddy_diff::binm = betam*sffrac |
| |
| real(r8), parameter | eddy_diff::binh = betah*sffrac |
| |
| real(r8) | eddy_diff::cpair |
| |
| real(r8) | eddy_diff::rair |
| |
| real(r8) | eddy_diff::zvir |
| |
| real(r8) | eddy_diff::latvap |
| |
| real(r8) | eddy_diff::latice |
| |
| real(r8) | eddy_diff::latsub |
| |
| real(r8) | eddy_diff::g |
| |
| real(r8) | eddy_diff::vk |
| |
| real(r8) | eddy_diff::ccon |
| |
| integer | eddy_diff::ntop_turb |
| |
| integer | eddy_diff::nbot_turb |
| |
| real(r8), dimension(:), allocatable | eddy_diff::ml2 |
| |
1.8.13