FV3 Bundle
|
Functions/Subroutines | |
subroutine, public | update_dz_c_tlm (is, ie, js, je, km, ng, dt, dp0, zs, area, ut, ut_tl, vt, vt_tl, gz, gz_tl, ws, ws_tl, npx, npy, sw_corner, se_corner, ne_corner, nw_corner, bd, grid_type) |
subroutine, public | update_dz_c (is, ie, js, je, km, ng, dt, dp0, zs, area, ut, vt, gz, ws, npx, npy, sw_corner, se_corner, ne_corner, nw_corner, bd, grid_type) |
subroutine, public | update_dz_d_tlm (ndif, damp, hord, is, ie, js, je, km, ng, npx, npy, area, rarea, dp0, zs, zh, zh_tl, crx, crx_tl, cry, cry_tl, xfx, xfx_tl, yfx, yfx_tl, delz, ws, ws_tl, rdt, gridstruct, bd, hord_pert) |
subroutine, public | update_dz_d (ndif, damp, hord, is, ie, js, je, km, ng, npx, npy, area, rarea, dp0, zs, zh, crx, cry, xfx, yfx, delz, ws, rdt, gridstruct, bd, hord_pert) |
subroutine, public | riem_solver_c_tlm (ms, dt, is, ie, js, je, km, ng, akap, cappa, cp, ptop, hs, w3, w3_tl, pt, pt_tl, q_con, delp, delp_tl, gz, gz_tl, pef, pef_tl, ws, ws_tl, p_fac, a_imp, scale_m) |
subroutine, public | riem_solver_c (ms, dt, is, ie, js, je, km, ng, akap, cappa, cp, ptop, hs, w3, pt, q_con, delp, gz, pef, ws, p_fac, a_imp, scale_m) |
subroutine | riem_solver3test (ms, dt, is, ie, js, je, km, ng, isd, ied, jsd, jed, akap, cappa, cp, ptop, zs, q_con, w, delz, pt, delp, zh, pe, ppe, pk3, pk, peln, ws, scale_m, p_fac, a_imp, use_logp, last_call, fp_out) |
subroutine | imp_diff_w (j, is, ie, js, je, ng, km, cd, delz, ws, w, w3) |
subroutine, public | rim_2d_tlm (ms, bdt, is, ie, km, rgas, gama, gm2, pe2, pe2_tl, dm2, dm2_tl, pm2, pm2_tl, w2, w2_tl, dz2, dz2_tl, pt2, pt2_tl, ws, ws_tl, c_core) |
subroutine, public | rim_2d (ms, bdt, is, ie, km, rgas, gama, gm2, pe2, dm2, pm2, w2, dz2, pt2, ws, c_core) |
subroutine, public | sim3_solver_tlm (dt, is, ie, km, rgas, gama, kappa, pe2, pe2_tl, dm, dm_tl, pem, pem_tl, w2, w2_tl, dz2, dz2_tl, pt2, pt2_tl, ws, ws_tl, alpha, p_fac, scale_m) |
subroutine, public | sim3_solver (dt, is, ie, km, rgas, gama, kappa, pe2, dm, pem, w2, dz2, pt2, ws, alpha, p_fac, scale_m) |
subroutine, public | sim3p0_solver_tlm (dt, is, ie, km, rgas, gama, kappa, pe2, pe2_tl, dm, dm_tl, pem, pem_tl, w2, w2_tl, dz2, dz2_tl, pt2, pt2_tl, ws, ws_tl, p_fac, scale_m) |
subroutine, public | sim3p0_solver (dt, is, ie, km, rgas, gama, kappa, pe2, dm, pem, w2, dz2, pt2, ws, p_fac, scale_m) |
subroutine, public | sim1_solver_tlm (dt, is, ie, km, rgas, gama, gm2, cp2, kappa, pe, pe_tl, dm2, dm2_tl, pm2, pm2_tl, pem, pem_tl, w2, w2_tl, dz2, dz2_tl, pt2, pt2_tl, ws, ws_tl, p_fac) |
subroutine, public | sim1_solver (dt, is, ie, km, rgas, gama, gm2, cp2, kappa, pe, dm2, pm2, pem, w2, dz2, pt2, ws, p_fac) |
subroutine, public | sim_solver_tlm (dt, is, ie, km, rgas, gama, gm2, cp2, kappa, pe2, pe2_tl, dm2, dm2_tl, pm2, pm2_tl, pem, pem_tl, w2, w2_tl, dz2, dz2_tl, pt2, pt2_tl, ws, ws_tl, alpha, p_fac, scale_m) |
subroutine, public | sim_solver (dt, is, ie, km, rgas, gama, gm2, cp2, kappa, pe2, dm2, pm2, pem, w2, dz2, pt2, ws, alpha, p_fac, scale_m) |
subroutine | edge_scalar (q1, qe, i1, i2, km, id) |
subroutine | edge_profile_tlm (q1, q1_tl, q2, q2_tl, q1e, q1e_tl, q2e, q2e_tl, i1, i2, j1, j2, j, km, dp0, uniform_grid, limiter) |
subroutine | edge_profile (q1, q2, q1e, q2e, i1, i2, j1, j2, j, km, dp0, uniform_grid, limiter) |
subroutine, public | nest_halo_nh_tlm (ptop, grav, kappa, cp, delp, delp_tl, delz, delz_tl, pt, pt_tl, phis, pkc, pkc_tl, gz, gz_tl, pk3, pk3_tl, npx, npy, npz, nested, pkc_pertn, computepk3, fullhalo, bd) |
subroutine, public | nest_halo_nh (ptop, grav, kappa, cp, delp, delz, pt, phis, pkc, gz, pk3, npx, npy, npz, nested, pkc_pertn, computepk3, fullhalo, bd) |
Variables | |
real, parameter | dz_min = 2. |
real, parameter | r3 = 1./3. |
|
private |
|
private |
|
private |
Definition at line 3274 of file nh_utils_tlm.F90.
|
private |
Definition at line 1078 of file nh_utils_tlm.F90.
subroutine, public nh_utils_tlm_mod::nest_halo_nh | ( | real, intent(in) | ptop, |
real, intent(in) | grav, | ||
real, intent(in) | kappa, | ||
real, intent(in) | cp, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(in) | delp, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(in) | delz, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(in) | pt, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed), intent(in) | phis, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz+1), intent(inout) | pkc, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz+1), intent(inout) | gz, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz+1), intent(inout) | pk3, | ||
integer, intent(in) | npx, | ||
integer, intent(in) | npy, | ||
integer, intent(in) | npz, | ||
logical, intent(in) | nested, | ||
logical, intent(in) | pkc_pertn, | ||
logical, intent(in) | computepk3, | ||
logical, intent(in) | fullhalo, | ||
type(fv_grid_bounds_type), intent(in) | bd | ||
) |
Definition at line 4175 of file nh_utils_tlm.F90.
subroutine, public nh_utils_tlm_mod::nest_halo_nh_tlm | ( | real, intent(in) | ptop, |
real, intent(in) | grav, | ||
real, intent(in) | kappa, | ||
real, intent(in) | cp, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(in) | delp, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(in) | delp_tl, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(in) | delz, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(in) | delz_tl, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(in) | pt, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz), intent(in) | pt_tl, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed), intent(in) | phis, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz+1), intent(inout) | pkc, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz+1), intent(inout) | pkc_tl, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz+1), intent(inout) | gz, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz+1), intent(inout) | gz_tl, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz+1), intent(inout) | pk3, | ||
real, dimension(bd%isd:bd%ied, bd%jsd:bd%jed, npz+1), intent(inout) | pk3_tl, | ||
integer, intent(in) | npx, | ||
integer, intent(in) | npy, | ||
integer, intent(in) | npz, | ||
logical, intent(in) | nested, | ||
logical, intent(in) | pkc_pertn, | ||
logical, intent(in) | computepk3, | ||
logical, intent(in) | fullhalo, | ||
type(fv_grid_bounds_type), intent(in) | bd | ||
) |
Definition at line 3588 of file nh_utils_tlm.F90.
|
private |
subroutine, public nh_utils_tlm_mod::riem_solver_c | ( | integer, intent(in) | ms, |
real, intent(in) | dt, | ||
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | js, | ||
integer, intent(in) | je, | ||
integer, intent(in) | km, | ||
integer, intent(in) | ng, | ||
real, intent(in) | akap, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | cappa, | ||
real, intent(in) | cp, | ||
real, intent(in) | ptop, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(in) | hs, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | w3, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | pt, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | q_con, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | delp, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km+1), intent(inout) | gz, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km+1), intent(out) | pef, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(in) | ws, | ||
real, intent(in) | p_fac, | ||
real, intent(in) | a_imp, | ||
real, intent(in) | scale_m | ||
) |
subroutine, public nh_utils_tlm_mod::riem_solver_c_tlm | ( | integer, intent(in) | ms, |
real, intent(in) | dt, | ||
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | js, | ||
integer, intent(in) | je, | ||
integer, intent(in) | km, | ||
integer, intent(in) | ng, | ||
real, intent(in) | akap, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | cappa, | ||
real, intent(in) | cp, | ||
real, intent(in) | ptop, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(in) | hs, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | w3, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | w3_tl, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | pt, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | pt_tl, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | q_con, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | delp, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | delp_tl, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km+1), intent(inout) | gz, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km+1), intent(inout) | gz_tl, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km+1), intent(out) | pef, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km+1), intent(out) | pef_tl, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(in) | ws, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(in) | ws_tl, | ||
real, intent(in) | p_fac, | ||
real, intent(in) | a_imp, | ||
real, intent(in) | scale_m | ||
) |
subroutine, public nh_utils_tlm_mod::rim_2d | ( | integer, intent(in) | ms, |
real, intent(in) | bdt, | ||
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | km, | ||
real, intent(in) | rgas, | ||
real, intent(in) | gama, | ||
real, dimension(is:ie, km), intent(in) | gm2, | ||
real, dimension(is:ie, km+1), intent(out) | pe2, | ||
real, dimension(is:ie, km), intent(in) | dm2, | ||
real, dimension(is:ie, km), intent(in) | pm2, | ||
real, dimension(is:ie, km), intent(inout) | w2, | ||
real, dimension(is:ie, km), intent(inout) | dz2, | ||
real, dimension(is:ie, km), intent(in) | pt2, | ||
real, dimension(is:ie), intent(in) | ws, | ||
logical, intent(in) | c_core | ||
) |
subroutine, public nh_utils_tlm_mod::rim_2d_tlm | ( | integer, intent(in) | ms, |
real, intent(in) | bdt, | ||
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | km, | ||
real, intent(in) | rgas, | ||
real, intent(in) | gama, | ||
real, dimension(is:ie, km), intent(in) | gm2, | ||
real, dimension(is:ie, km+1), intent(out) | pe2, | ||
real, dimension(is:ie, km+1), intent(out) | pe2_tl, | ||
real, dimension(is:ie, km), intent(in) | dm2, | ||
real, dimension(is:ie, km), intent(in) | dm2_tl, | ||
real, dimension(is:ie, km), intent(in) | pm2, | ||
real, dimension(is:ie, km), intent(in) | pm2_tl, | ||
real, dimension(is:ie, km), intent(inout) | w2, | ||
real, dimension(is:ie, km), intent(inout) | w2_tl, | ||
real, dimension(is:ie, km), intent(inout) | dz2, | ||
real, dimension(is:ie, km), intent(inout) | dz2_tl, | ||
real, dimension(is:ie, km), intent(in) | pt2, | ||
real, dimension(is:ie, km), intent(in) | pt2_tl, | ||
real, dimension(is:ie), intent(in) | ws, | ||
real, dimension(is:ie), intent(in) | ws_tl, | ||
logical, intent(in) | c_core | ||
) |
subroutine, public nh_utils_tlm_mod::sim1_solver | ( | real, intent(in) | dt, |
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | km, | ||
real, intent(in) | rgas, | ||
real, intent(in) | gama, | ||
real, dimension(is:ie, km), intent(in) | gm2, | ||
real, dimension(is:ie, km), intent(in) | cp2, | ||
real, intent(in) | kappa, | ||
real, dimension(is:ie, km+1), intent(out) | pe, | ||
real, dimension(is:ie, km), intent(in) | dm2, | ||
real, dimension(is:ie, km), intent(in) | pm2, | ||
real, dimension(is:ie, km+1), intent(in) | pem, | ||
real, dimension(is:ie, km), intent(inout) | w2, | ||
real, dimension(is:ie, km), intent(inout) | dz2, | ||
real, dimension(is:ie, km), intent(in) | pt2, | ||
real, dimension(is:ie), intent(in) | ws, | ||
real, intent(in) | p_fac | ||
) |
subroutine, public nh_utils_tlm_mod::sim1_solver_tlm | ( | real, intent(in) | dt, |
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | km, | ||
real, intent(in) | rgas, | ||
real, intent(in) | gama, | ||
real, dimension(is:ie, km), intent(in) | gm2, | ||
real, dimension(is:ie, km), intent(in) | cp2, | ||
real, intent(in) | kappa, | ||
real, dimension(is:ie, km+1), intent(out) | pe, | ||
real, dimension(is:ie, km+1), intent(out) | pe_tl, | ||
real, dimension(is:ie, km), intent(in) | dm2, | ||
real, dimension(is:ie, km), intent(in) | dm2_tl, | ||
real, dimension(is:ie, km), intent(in) | pm2, | ||
real, dimension(is:ie, km), intent(in) | pm2_tl, | ||
real, dimension(is:ie, km+1), intent(in) | pem, | ||
real, dimension(is:ie, km+1), intent(in) | pem_tl, | ||
real, dimension(is:ie, km), intent(inout) | w2, | ||
real, dimension(is:ie, km), intent(inout) | w2_tl, | ||
real, dimension(is:ie, km), intent(inout) | dz2, | ||
real, dimension(is:ie, km), intent(inout) | dz2_tl, | ||
real, dimension(is:ie, km), intent(in) | pt2, | ||
real, dimension(is:ie, km), intent(in) | pt2_tl, | ||
real, dimension(is:ie), intent(in) | ws, | ||
real, dimension(is:ie), intent(in) | ws_tl, | ||
real, intent(in) | p_fac | ||
) |
subroutine, public nh_utils_tlm_mod::sim3_solver | ( | real, intent(in) | dt, |
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | km, | ||
real, intent(in) | rgas, | ||
real, intent(in) | gama, | ||
real, intent(in) | kappa, | ||
real, dimension(is:ie, km+1), intent(out) | pe2, | ||
real, dimension(is:ie, km), intent(in) | dm, | ||
real, dimension(is:ie, km+1), intent(in) | pem, | ||
real, dimension(is:ie, km), intent(inout) | w2, | ||
real, dimension(is:ie, km), intent(inout) | dz2, | ||
real, dimension(is:ie, km), intent(in) | pt2, | ||
real, dimension(is:ie), intent(in) | ws, | ||
real, intent(in) | alpha, | ||
real, intent(in) | p_fac, | ||
real, intent(in) | scale_m | ||
) |
subroutine, public nh_utils_tlm_mod::sim3_solver_tlm | ( | real, intent(in) | dt, |
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | km, | ||
real, intent(in) | rgas, | ||
real, intent(in) | gama, | ||
real, intent(in) | kappa, | ||
real, dimension(is:ie, km+1), intent(out) | pe2, | ||
real, dimension(is:ie, km+1), intent(out) | pe2_tl, | ||
real, dimension(is:ie, km), intent(in) | dm, | ||
real, dimension(is:ie, km), intent(in) | dm_tl, | ||
real, dimension(is:ie, km+1), intent(in) | pem, | ||
real, dimension(is:ie, km+1), intent(in) | pem_tl, | ||
real, dimension(is:ie, km), intent(inout) | w2, | ||
real, dimension(is:ie, km), intent(inout) | w2_tl, | ||
real, dimension(is:ie, km), intent(inout) | dz2, | ||
real, dimension(is:ie, km), intent(inout) | dz2_tl, | ||
real, dimension(is:ie, km), intent(in) | pt2, | ||
real, dimension(is:ie, km), intent(in) | pt2_tl, | ||
real, dimension(is:ie), intent(in) | ws, | ||
real, dimension(is:ie), intent(in) | ws_tl, | ||
real, intent(in) | alpha, | ||
real, intent(in) | p_fac, | ||
real, intent(in) | scale_m | ||
) |
Definition at line 1765 of file nh_utils_tlm.F90.
subroutine, public nh_utils_tlm_mod::sim3p0_solver | ( | real, intent(in) | dt, |
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | km, | ||
real, intent(in) | rgas, | ||
real, intent(in) | gama, | ||
real, intent(in) | kappa, | ||
real, dimension(is:ie, km+1), intent(out) | pe2, | ||
real, dimension(is:ie, km), intent(in) | dm, | ||
real, dimension(is:ie, km+1), intent(in) | pem, | ||
real, dimension(is:ie, km), intent(inout) | w2, | ||
real, dimension(is:ie, km), intent(inout) | dz2, | ||
real, dimension(is:ie, km), intent(in) | pt2, | ||
real, dimension(is:ie), intent(in) | ws, | ||
real, intent(in) | p_fac, | ||
real, intent(in) | scale_m | ||
) |
subroutine, public nh_utils_tlm_mod::sim3p0_solver_tlm | ( | real, intent(in) | dt, |
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | km, | ||
real, intent(in) | rgas, | ||
real, intent(in) | gama, | ||
real, intent(in) | kappa, | ||
real, dimension(is:ie, km+1), intent(out) | pe2, | ||
real, dimension(is:ie, km+1), intent(out) | pe2_tl, | ||
real, dimension(is:ie, km), intent(in) | dm, | ||
real, dimension(is:ie, km), intent(in) | dm_tl, | ||
real, dimension(is:ie, km+1), intent(in) | pem, | ||
real, dimension(is:ie, km+1), intent(in) | pem_tl, | ||
real, dimension(is:ie, km), intent(inout) | w2, | ||
real, dimension(is:ie, km), intent(inout) | w2_tl, | ||
real, dimension(is:ie, km), intent(inout) | dz2, | ||
real, dimension(is:ie, km), intent(inout) | dz2_tl, | ||
real, dimension(is:ie, km), intent(in) | pt2, | ||
real, dimension(is:ie, km), intent(in) | pt2_tl, | ||
real, dimension(is:ie), intent(in) | ws, | ||
real, dimension(is:ie), intent(in) | ws_tl, | ||
real, intent(in) | p_fac, | ||
real, intent(in) | scale_m | ||
) |
subroutine, public nh_utils_tlm_mod::sim_solver | ( | real, intent(in) | dt, |
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | km, | ||
real, intent(in) | rgas, | ||
real, intent(in) | gama, | ||
real, dimension(is:ie, km), intent(in) | gm2, | ||
real, dimension(is:ie, km), intent(in) | cp2, | ||
real, intent(in) | kappa, | ||
real, dimension(is:ie, km+1), intent(out) | pe2, | ||
real, dimension(is:ie, km), intent(in) | dm2, | ||
real, dimension(is:ie, km), intent(in) | pm2, | ||
real, dimension(is:ie, km+1), intent(in) | pem, | ||
real, dimension(is:ie, km), intent(inout) | w2, | ||
real, dimension(is:ie, km), intent(inout) | dz2, | ||
real, dimension(is:ie, km), intent(in) | pt2, | ||
real, dimension(is:ie), intent(in) | ws, | ||
real, intent(in) | alpha, | ||
real, intent(in) | p_fac, | ||
real, intent(in) | scale_m | ||
) |
subroutine, public nh_utils_tlm_mod::sim_solver_tlm | ( | real, intent(in) | dt, |
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | km, | ||
real, intent(in) | rgas, | ||
real, intent(in) | gama, | ||
real, dimension(is:ie, km), intent(in) | gm2, | ||
real, dimension(is:ie, km), intent(in) | cp2, | ||
real, intent(in) | kappa, | ||
real, dimension(is:ie, km+1), intent(out) | pe2, | ||
real, dimension(is:ie, km+1), intent(out) | pe2_tl, | ||
real, dimension(is:ie, km), intent(in) | dm2, | ||
real, dimension(is:ie, km), intent(in) | dm2_tl, | ||
real, dimension(is:ie, km), intent(in) | pm2, | ||
real, dimension(is:ie, km), intent(in) | pm2_tl, | ||
real, dimension(is:ie, km+1), intent(in) | pem, | ||
real, dimension(is:ie, km+1), intent(in) | pem_tl, | ||
real, dimension(is:ie, km), intent(inout) | w2, | ||
real, dimension(is:ie, km), intent(inout) | w2_tl, | ||
real, dimension(is:ie, km), intent(inout) | dz2, | ||
real, dimension(is:ie, km), intent(inout) | dz2_tl, | ||
real, dimension(is:ie, km), intent(in) | pt2, | ||
real, dimension(is:ie, km), intent(in) | pt2_tl, | ||
real, dimension(is:ie), intent(in) | ws, | ||
real, dimension(is:ie), intent(in) | ws_tl, | ||
real, intent(in) | alpha, | ||
real, intent(in) | p_fac, | ||
real, intent(in) | scale_m | ||
) |
Definition at line 2888 of file nh_utils_tlm.F90.
subroutine, public nh_utils_tlm_mod::update_dz_c | ( | integer, intent(in) | is, |
integer, intent(in) | ie, | ||
integer, intent(in) | js, | ||
integer, intent(in) | je, | ||
integer, intent(in) | km, | ||
integer, intent(in) | ng, | ||
real, intent(in) | dt, | ||
real, dimension(km), intent(in) | dp0, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(in) | zs, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(in) | area, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | ut, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | vt, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km+1), intent(inout) | gz, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(out) | ws, | ||
integer, intent(in) | npx, | ||
integer, intent(in) | npy, | ||
logical, intent(in) | sw_corner, | ||
logical, intent(in) | se_corner, | ||
logical, intent(in) | ne_corner, | ||
logical, intent(in) | nw_corner, | ||
type(fv_grid_bounds_type), intent(in) | bd, | ||
integer, intent(in) | grid_type | ||
) |
Definition at line 238 of file nh_utils_tlm.F90.
subroutine, public nh_utils_tlm_mod::update_dz_c_tlm | ( | integer, intent(in) | is, |
integer, intent(in) | ie, | ||
integer, intent(in) | js, | ||
integer, intent(in) | je, | ||
integer, intent(in) | km, | ||
integer, intent(in) | ng, | ||
real, intent(in) | dt, | ||
real, dimension(km), intent(in) | dp0, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(in) | zs, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(in) | area, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | ut, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | ut_tl, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | vt, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(in) | vt_tl, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km+1), intent(inout) | gz, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km+1), intent(inout) | gz_tl, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(out) | ws, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(out) | ws_tl, | ||
integer, intent(in) | npx, | ||
integer, intent(in) | npy, | ||
logical, intent(in) | sw_corner, | ||
logical, intent(in) | se_corner, | ||
logical, intent(in) | ne_corner, | ||
logical, intent(in) | nw_corner, | ||
type(fv_grid_bounds_type), intent(in) | bd, | ||
integer, intent(in) | grid_type | ||
) |
subroutine, public nh_utils_tlm_mod::update_dz_d | ( | integer, dimension(km+1), intent(inout) | ndif, |
real, dimension(km+1), intent(inout) | damp, | ||
integer, intent(in) | hord, | ||
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | js, | ||
integer, intent(in) | je, | ||
integer, intent(in) | km, | ||
integer, intent(in) | ng, | ||
integer, intent(in) | npx, | ||
integer, intent(in) | npy, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(in) | area, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(in) | rarea, | ||
real, dimension(km), intent(in) | dp0, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(in) | zs, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km+1), intent(inout) | zh, | ||
real, dimension(is:ie+1, js-ng:je+ng, km), intent(inout) | crx, | ||
real, dimension(is-ng:ie+ng, js:je+1, km), intent(inout) | cry, | ||
real, dimension(is:ie+1, js-ng:je+ng, km), intent(inout) | xfx, | ||
real, dimension(is-ng:ie+ng, js:je+1, km), intent(inout) | yfx, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(out) | delz, | ||
real, dimension(is:ie, js:je), intent(out) | ws, | ||
real, intent(in) | rdt, | ||
type(fv_grid_type), intent(in), target | gridstruct, | ||
type(fv_grid_bounds_type), intent(in) | bd, | ||
integer, intent(in) | hord_pert | ||
) |
subroutine, public nh_utils_tlm_mod::update_dz_d_tlm | ( | integer, dimension(km+1), intent(inout) | ndif, |
real, dimension(km+1), intent(inout) | damp, | ||
integer, intent(in) | hord, | ||
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | js, | ||
integer, intent(in) | je, | ||
integer, intent(in) | km, | ||
integer, intent(in) | ng, | ||
integer, intent(in) | npx, | ||
integer, intent(in) | npy, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(in) | area, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(in) | rarea, | ||
real, dimension(km), intent(in) | dp0, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng), intent(in) | zs, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km+1), intent(inout) | zh, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km+1), intent(inout) | zh_tl, | ||
real, dimension(is:ie+1, js-ng:je+ng, km), intent(inout) | crx, | ||
real, dimension(is:ie+1, js-ng:je+ng, km), intent(inout) | crx_tl, | ||
real, dimension(is-ng:ie+ng, js:je+1, km), intent(inout) | cry, | ||
real, dimension(is-ng:ie+ng, js:je+1, km), intent(inout) | cry_tl, | ||
real, dimension(is:ie+1, js-ng:je+ng, km), intent(inout) | xfx, | ||
real, dimension(is:ie+1, js-ng:je+ng, km), intent(inout) | xfx_tl, | ||
real, dimension(is-ng:ie+ng, js:je+1, km), intent(inout) | yfx, | ||
real, dimension(is-ng:ie+ng, js:je+1, km), intent(inout) | yfx_tl, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(out) | delz, | ||
real, dimension(is:ie, js:je), intent(out) | ws, | ||
real, dimension(is:ie, js:je), intent(out) | ws_tl, | ||
real, intent(in) | rdt, | ||
type(fv_grid_type), intent(in), target | gridstruct, | ||
type(fv_grid_bounds_type), intent(in) | bd, | ||
integer, intent(in) | hord_pert | ||
) |
|
private |
Definition at line 44 of file nh_utils_tlm.F90.
|
private |
Definition at line 45 of file nh_utils_tlm.F90.