FV3 Bundle
bldriver.F90 File Reference

Go to the source code of this file.

Modules

module  bldriver
 

Functions/Subroutines

subroutine, public bldriver::bl_driver (IM, JM, LM, DT, U, V, TH, Q, P, QIT, QLT, FRLAND, FROCEAN, VARFLT, ZPBL, CM, CT, CQ, TURBPARAMS, TURBPARAMSI, USTAR, BSTAR, AKS, BKS, CKS, AKQ, BKQ, CKQ, AKV, BKV, CKV, EKV, FKV)
 
subroutine bldriver::preliminary (IRUN, LM, DT, T, QV, PHALF, TH, QIT, QLT, ZFULL, ZHALF, TV, PV, RDZ, DMI, PFULL)
 
subroutine bldriver::louis_diff (IRUN, LM, KH, KM, RI, DU, ZPBL, ZZ, ZE, PV, UU, VV, LOUIS, MINSHEAR, MINTHICK, LAMBDAM, LAMBDAM2, LAMBDAH, LAMBDAH2, ZKMENV, ZKHENV, AKHMMAX, ALH_DIAG, KMLS_DIAG, KHLS_DIAG)
 
subroutine bldriver::tridiag_setup (IRUN, LM, DT, KPBLMIN, ZFULL, PFULL, RDZ, DMI, PHALF, TV, CT, CQ, CU, T, Q, TH, U, V, DIFF_T, DIFF_M, AKQ, AKS, AKV, BKQ, BKS, BKV, CKQ, CKS, CKV, EKV, ZPBL)
 
subroutine bldriver::orodrag (IRUN, LM, DT, LAMBDA_B, C_B, FKV, BKV, U, V, ZFULL, VARFLT, PHALF)
 
subroutine bldriver::lock_diff (ncol, nlev, tdtlw_in_dev, u_star_dev, b_star_dev, frland_dev, t_dev, qv_dev, qit_dev, qlt_dev, u_dev, v_dev, zfull_dev, pfull_dev, zhalf_dev, phalf_dev, diff_m_dev, diff_t_dev, prandtlsfc_const, prandtlrad_const, beta_surf_const, beta_rad_const, tpfac_sfc_const, entrate_sfc_const, pceff_sfc_const, khradfac_const, khsfcfac_const, radlw_dep, ESTBLX)
 
subroutine bldriver::mpbl_depth (i, ncol, nlev, tpfac, entrate, pceff, t, q, u, v, z, p, b_star, u_star, ipbl, ztop, ESTBLX)
 
subroutine bldriver::radml_depth (i, ncol, nlev, toplev, botlev, svp, zt, critjump, do_jump_exit, t, zf, zh, zb, zml)
 
subroutine bldriver::diffusivity_pbl2 (i, ncol, lm, h, kfac, k_ent, vsurf, frland, zm, k_m, k_t)
 
subroutine bldriver::esinit (ESTBLX)
 
subroutine bldriver::qsatlqu0 (QS, TL)
 
subroutine bldriver::qsatice0 (QS, TL)
 
subroutine bldriver::dqsat_sub_sca (DQSi, QSSi, TEMP, PLO, ESTBLX)
 

Variables

integer, parameter bldriver::degsubs = 100
 
real(kind_real), parameter bldriver::tmintbl = 150.0
 
real(kind_real), parameter bldriver::tmaxtbl = 333.0
 
integer, parameter bldriver::tablesize = nint(TMAXTBL-TMINTBL)*DEGSUBS + 1