subroutine module_bl_mynn::mynn_bl_driver |
( |
integer, intent(in) |
initflag, |
|
|
logical, intent(in) |
restart, |
|
|
logical, intent(in) |
cycling, |
|
|
real(kind_phys), intent(in) |
delt, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
dz, |
|
|
real(kind_phys), dimension(:), intent(in) |
dx, |
|
|
real(kind_phys), dimension(:), intent(in) |
znt, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
u, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
v, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
w, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
th, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
sqv3d, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
sqc3d, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
sqi3d, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
sqs3d, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
qnc, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
qni, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
qnwfa, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
qnifa, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
qnbca, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
ozone, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
p, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
exner, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
rho, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
t3d, |
|
|
real(kind_phys), dimension(:), intent(in) |
xland, |
|
|
real(kind_phys), dimension(:), intent(in) |
ts, |
|
|
real(kind_phys), dimension(:), intent(in) |
qsfc, |
|
|
real(kind_phys), dimension(:), intent(in) |
ps, |
|
|
real(kind_phys), dimension(:), intent(in) |
ust, |
|
|
real(kind_phys), dimension(:), intent(in) |
ch, |
|
|
real(kind_phys), dimension(:), intent(in) |
hfx, |
|
|
real(kind_phys), dimension(:), intent(in) |
qfx, |
|
|
real(kind_phys), dimension(:), intent(inout) |
rmol, |
|
|
real(kind_phys), dimension(:), intent(in) |
wspd, |
|
|
real(kind_phys), dimension(:), intent(in) |
uoce, |
|
|
real(kind_phys), dimension(:), intent(in) |
voce, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
qke, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
qke_adv, |
|
|
real(kind_phys), dimension(:,:), intent(out) |
sh3d, |
|
|
real(kind_phys), dimension(:,:), intent(out) |
sm3d, |
|
|
integer, intent(in) |
nchem, |
|
|
integer, intent(in) |
kdvel, |
|
|
integer, intent(in) |
ndvel, |
|
|
real(kind_phys), dimension(:,:,:), intent(inout) |
chem3d, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
vdep, |
|
|
logical, intent(in) |
smoke_dbg, |
|
|
real(kind_phys), dimension(:), intent(in) |
frp, |
|
|
real(kind_phys), dimension(:), intent(in) |
emis_ant_no, |
|
|
logical, intent(in) |
mix_chem, |
|
|
logical, intent(in) |
enh_mix, |
|
|
logical, intent(in) |
rrfs_sd, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
tsq, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
qsq, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
cov, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
rublten, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
rvblten, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
rthblten, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
rqvblten, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
rqcblten, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
rqiblten, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
rqncblten, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
rqniblten, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
rqsblten, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
rqnwfablten, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
rqnifablten, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
rqnbcablten, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
dozone, |
|
|
real(kind_phys), dimension(:,:), intent(out) |
exch_h, |
|
|
real(kind_phys), dimension(:,:), intent(out) |
exch_m, |
|
|
real(kind_phys), dimension(:), intent(inout) |
pblh, |
|
|
integer, dimension(:), intent(inout) |
kpbl, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
el_pbl, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
dqke, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
qwt, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
qshear, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
qbuoy, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
qdiss, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
qc_bl, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
qi_bl, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
cldfra_bl, |
|
|
logical, intent(in) |
bl_mynn_tkeadvect, |
|
|
integer, intent(in) |
tke_budget, |
|
|
integer, intent(in) |
bl_mynn_cloudpdf, |
|
|
integer, intent(in) |
bl_mynn_mixlength, |
|
|
integer, intent(in) |
icloud_bl, |
|
|
real(kind_phys), intent(in) |
closure, |
|
|
integer, intent(in) |
bl_mynn_edmf, |
|
|
integer, intent(in) |
bl_mynn_edmf_mom, |
|
|
integer, intent(in) |
bl_mynn_edmf_tke, |
|
|
integer, intent(in) |
bl_mynn_mixscalars, |
|
|
integer, intent(in) |
bl_mynn_output, |
|
|
integer, intent(in) |
bl_mynn_cloudmix, |
|
|
integer, intent(in) |
bl_mynn_mixqt, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
edmf_a, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
edmf_w, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
edmf_qt, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
edmf_thl, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
edmf_ent, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
edmf_qc, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
sub_thl3D, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
sub_sqv3D, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
det_thl3D, |
|
|
real(kind_phys), dimension(:,:), intent(inout) |
det_sqv3D, |
|
|
integer, dimension(:), intent(inout) |
nupdraft, |
|
|
real(kind_phys), dimension(:), intent(out) |
maxMF, |
|
|
integer, dimension(:), intent(inout) |
ktop_plume, |
|
|
integer, intent(in) |
spp_pbl, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
pattern_spp_pbl, |
|
|
real(kind_phys), dimension(:,:), intent(in) |
rthraten, |
|
|
logical, intent(in) |
FLAG_QC, |
|
|
logical, intent(in) |
FLAG_QI, |
|
|
logical, intent(in) |
FLAG_QNC, |
|
|
logical, intent(in) |
FLAG_QNI, |
|
|
logical, intent(in) |
FLAG_QS, |
|
|
logical, intent(in) |
FLAG_QNWFA, |
|
|
logical, intent(in) |
FLAG_QNIFA, |
|
|
logical, intent(in) |
FLAG_QNBCA, |
|
|
logical, intent(in) |
FLAG_OZONE, |
|
|
integer, intent(in) |
IDS, |
|
|
integer, intent(in) |
IDE, |
|
|
integer, intent(in) |
JDS, |
|
|
integer, intent(in) |
JDE, |
|
|
integer, intent(in) |
KDS, |
|
|
integer, intent(in) |
KDE, |
|
|
integer, intent(in) |
IMS, |
|
|
integer, intent(in) |
IME, |
|
|
integer, intent(in) |
JMS, |
|
|
integer, intent(in) |
JME, |
|
|
integer, intent(in) |
KMS, |
|
|
integer, intent(in) |
KME, |
|
|
integer, intent(in) |
ITS, |
|
|
integer, intent(in) |
ITE, |
|
|
integer, intent(in) |
JTS, |
|
|
integer, intent(in) |
JTE, |
|
|
integer, intent(in) |
KTS, |
|
|
integer, intent(in) |
KTE |
|
) |
| |