|
| subroutine, public | fv_sg_tlm_mod::fv_subgrid_z_tlm (isd, ied, jsd, jed, is, ie, js, je, km, nq, dt, tau, nwat, delp, delp_tl, pe, pe_tl, peln, peln_tl, pkz, pkz_tl, ta, ta_tl, qa, qa_tl, ua, ua_tl, va, va_tl, hydrostatic, w, w_tl, delz, delz_tl, u_dt, v_dt, t_dt, k_bot) |
| |
| subroutine, public | fv_sg_tlm_mod::fv_subgrid_z (isd, ied, jsd, jed, is, ie, js, je, km, nq, dt, tau, nwat, delp, pe, peln, pkz, ta, qa, ua, va, hydrostatic, w, delz, u_dt, v_dt, t_dt, k_bot) |
| |
| subroutine, public | fv_sg_tlm_mod::neg_adj3 (is, ie, js, je, ng, kbot, hydrostatic, peln, delz, pt, dp, qv, ql, qr, qi, qs, qg, qa, check_negative) |
| |
|
| real, parameter | fv_sg_tlm_mod::esl = 0.621971831 |
| |
| real, parameter | fv_sg_tlm_mod::tice = 273.16 |
| |
| real, parameter | fv_sg_tlm_mod::c_ice = 1972. |
| |
| real, parameter | fv_sg_tlm_mod::c_liq = 4.1855e+3 |
| |
| real, parameter | fv_sg_tlm_mod::cv_vap = cp_vapor - rvgas |
| |
| real, parameter | fv_sg_tlm_mod::c_con = c_ice |
| |
| real, parameter | fv_sg_tlm_mod::dc_vap = cv_vap - c_liq |
| |
| real, parameter | fv_sg_tlm_mod::dc_ice = c_liq - c_ice |
| |
| real, parameter | fv_sg_tlm_mod::hlv0 = 2.5e6 |
| |
| real, parameter | fv_sg_tlm_mod::hlf0 = 3.3358e5 |
| |
| real, parameter | fv_sg_tlm_mod::t_ice = 273.16 |
| |
| real, parameter | fv_sg_tlm_mod::ri_max = 1. |
| |
| real, parameter | fv_sg_tlm_mod::ri_min = 0.25 |
| |
| real, parameter | fv_sg_tlm_mod::t1_min = 160. |
| |
| real, parameter | fv_sg_tlm_mod::t2_min = 165. |
| |
| real, parameter | fv_sg_tlm_mod::t2_max = 315. |
| |
| real, parameter | fv_sg_tlm_mod::t3_max = 325. |
| |
| real, parameter | fv_sg_tlm_mod::lv0 = hlv0 - dc_vap*t_ice |
| |
| real, parameter | fv_sg_tlm_mod::li0 = hlf0 - dc_ice*t_ice |
| |
| real, parameter | fv_sg_tlm_mod::zvir = rvgas/rdgas - 1. |
| |
| real, dimension(:), allocatable | fv_sg_tlm_mod::table |
| |
| real, dimension(:), allocatable | fv_sg_tlm_mod::des |
| |
| real | fv_sg_tlm_mod::lv00 |
| |
| real | fv_sg_tlm_mod::d0_vap |
| |
1.8.14