FV3 Bundle
|
Functions/Subroutines | |
subroutine, public | lagrangian_to_eulerian_fwd (last_step, consv, ps, pe, delp, pkz, pk, mdt, pdt, km, is, ie, js, je, isd, ied, jsd, jed, nq, nwat, sphum, q_con, u, v, w, delz, pt, q, hs, r_vir, cp, akap, cappa, kord_mt, kord_wz, kord_tr, kord_tm, peln, te0_2d, ng, ua, va, omga, te, ws, fill, reproduce_sum, out_dt, dtdt, ptop, ak, bk, pfull, flagstruct, gridstruct, domain, do_sat_adj, hydrostatic, hybrid_z, do_omega, adiabatic, do_adiabatic_init, mfx, mfy, remap_option, kord_mt_pert, kord_wz_pert, kord_tr_pert, kord_tm_pert) |
subroutine, public | lagrangian_to_eulerian_bwd (last_step, consv, ps, ps_ad, pe, pe_ad, delp, delp_ad, pkz, pkz_ad, pk, pk_ad, mdt, pdt, km, is, ie, js, je, isd, ied, jsd, jed, nq, nwat, sphum, q_con, u, u_ad, v, v_ad, w, w_ad, delz, delz_ad, pt, pt_ad, q, q_ad, hs, r_vir, cp, akap, cappa, kord_mt, kord_wz, kord_tr, kord_tm, peln, peln_ad, te0_2d, te0_2d_ad, ng, ua, ua_ad, va, omga, omga_ad, te, te_ad, ws, ws_ad, fill, reproduce_sum, out_dt, dtdt, ptop, ak, bk, pfull, flagstruct, gridstruct, domain, do_sat_adj, hydrostatic, hybrid_z, do_omega, adiabatic, do_adiabatic_init, mfx, mfy, remap_option, kord_mt_pert, kord_wz_pert, kord_tr_pert, kord_tm_pert) |
subroutine, public | lagrangian_to_eulerian (last_step, consv, ps, pe, delp, pkz, pk, mdt, pdt, km, is, ie, js, je, isd, ied, jsd, jed, nq, nwat, sphum, q_con, u, v, w, delz, pt, q, hs, r_vir, cp, akap, cappa, kord_mt, kord_wz, kord_tr, kord_tm, peln, te0_2d, ng, ua, va, omga, te, ws, fill, reproduce_sum, out_dt, dtdt, ptop, ak, bk, pfull, flagstruct, gridstruct, domain, do_sat_adj, hydrostatic, hybrid_z, do_omega, adiabatic, do_adiabatic_init, mfx, mfy, remap_option, kord_mt_pert, kord_wz_pert, kord_tr_pert, kord_tm_pert) |
subroutine, public | compute_total_energy_fwd (is, ie, js, je, isd, ied, jsd, jed, km, u, v, w, delz, pt, delp, q, qc, pe, peln, hs, rsin2_l, cosa_s_l, r_vir, cp, rg, hlv, te_2d, ua, va, teq, moist_phys, nwat, sphum, liq_wat, rainwat, ice_wat, snowwat, graupel, hydrostatic, id_te) |
subroutine, public | compute_total_energy_bwd (is, ie, js, je, isd, ied, jsd, jed, km, u, u_ad, v, v_ad, w, w_ad, delz, delz_ad, pt, pt_ad, delp, delp_ad, q, q_ad, qc, qc_ad, pe, pe_ad, peln, peln_ad, hs, rsin2_l, cosa_s_l, r_vir, cp, rg, hlv, te_2d, te_2d_ad, ua, va, teq, teq_ad, moist_phys, nwat, sphum, liq_wat, rainwat, ice_wat, snowwat, graupel, hydrostatic, id_te) |
subroutine, public | compute_total_energy (is, ie, js, je, isd, ied, jsd, jed, km, u, v, w, delz, pt, delp, q, qc, pe, peln, hs, rsin2_l, cosa_s_l, r_vir, cp, rg, hlv, te_2d, ua, va, teq, moist_phys, nwat, sphum, liq_wat, rainwat, ice_wat, snowwat, graupel, hydrostatic, id_te) |
subroutine | pkez_fwd (km, ifirst, ilast, jfirst, jlast, j, pe, pk, akap, peln, pkz, ptop) |
subroutine | pkez_bwd (km, ifirst, ilast, jfirst, jlast, j, pe, pk, pk_ad, akap, peln, peln_ad, pkz, pkz_ad, ptop) |
subroutine | pkez (km, ifirst, ilast, jfirst, jlast, j, pe, pk, akap, peln, pkz, ptop) |
subroutine | remap_z (km, pe1, q1, kn, pe2, q2, i1, i2, iv, kord) |
subroutine | map_scalar_adm (km, pe1, pe1_ad, qs, kn, pe2, pe2_ad, q2, q2_ad, i1, i2, j, ibeg, iend, jbeg, jend, iv, kord, q_min) |
subroutine | map_scalar (km, pe1, qs, kn, pe2, q2, i1, i2, j, ibeg, iend, jbeg, jend, iv, kord, q_min) |
subroutine | map1_ppm_adm (km, pe1, pe1_ad, qs, qs_ad, kn, pe2, pe2_ad, q2, q2_ad, i1, i2, j, ibeg, iend, jbeg, jend, iv, kord) |
subroutine | map1_ppm (km, pe1, qs, kn, pe2, q2, i1, i2, j, ibeg, iend, jbeg, jend, iv, kord) |
subroutine | mapn_tracer_adm (nq, km, pe1, pe1_ad, pe2, pe2_ad, q1, q1_ad, dp2, dp2_ad, kord, j, i1, i2, isd, ied, jsd, jed, q_min, fill) |
subroutine | mapn_tracer (nq, km, pe1, pe2, q1, dp2, kord, j, i1, i2, isd, ied, jsd, jed, q_min, fill) |
subroutine | map1_q2_adm (km, pe1, pe1_ad, q1, q1_ad, kn, pe2, pe2_ad, q2, q2_ad, dp2, dp2_ad, i1, i2, iv, kord, j, ibeg, iend, jbeg, jend, q_min) |
subroutine, public | map1_q2 (km, pe1, q1, kn, pe2, q2, dp2, i1, i2, iv, kord, j, ibeg, iend, jbeg, jend, q_min) |
subroutine | scalar_profile_adm (qs, a4, a4_ad, delp, delp_ad, km, i1, i2, iv, kord, qmin) |
subroutine | scalar_profile (qs, a4, delp, km, i1, i2, iv, kord, qmin) |
subroutine | cs_profile_adm (qs, qs_ad, a4, a4_ad, delp, delp_ad, km, i1, i2, iv, kord) |
subroutine | cs_profile (qs, a4, delp, km, i1, i2, iv, kord) |
subroutine | cs_limiters_fwd (im, extm, a4, iv) |
subroutine | cs_limiters_bwd (im, extm, a4, a4_ad, iv) |
subroutine | cs_limiters (im, extm, a4, iv) |
subroutine | ppm_profile_fwd (a4, delp, km, i1, i2, iv, kord) |
subroutine | ppm_profile_bwd (a4, a4_ad, delp, delp_ad, km, i1, i2, iv, kord) |
subroutine | ppm_limiters_fwd (dm, a4, itot, lmt) |
subroutine | ppm_limiters_bwd (dm, dm_ad, a4, a4_ad, itot, lmt) |
subroutine | steepz (i1, i2, km, a4, df2, dm, dq, dp, d4) |
subroutine, public | rst_remap (km, kn, is, ie, js, je, isd, ied, jsd, jed, nq, ntp, delp_r, u_r, v_r, w_r, delz_r, pt_r, q_r, qdiag_r, delp, u, v, w, delz, pt, q, qdiag, ak_r, bk_r, ptop, ak, bk, hydrostatic, make_nh, domain, square_domain) |
subroutine | remap_2d (km, pe1, q1, kn, pe2, q2, i1, i2, iv, kord) |
subroutine, public | mappm (km, pe1, q1, kn, pe2, q2, i1, i2, iv, kord, ptop) |
subroutine | ppm_profile (a4, delp, km, i1, i2, iv, kord) |
subroutine | ppm_limiters (dm, a4, itot, lmt) |
subroutine, public | moist_cv (is, ie, isd, ied, jsd, jed, km, j, k, nwat, sphum, liq_wat, rainwat, ice_wat, snowwat, graupel, q, qd, cvm, t1) |
subroutine, public | moist_cp (is, ie, isd, ied, jsd, jed, km, j, k, nwat, sphum, liq_wat, rainwat, ice_wat, snowwat, graupel, q, qd, cpm, t1) |
subroutine | map1_cubic_fwd (km, pe1, kn, pe2, q2, i1, i2, j, ibeg, iend, jbeg, jend, akap, t_var, conserv) |
subroutine | map1_cubic_bwd (km, pe1, pe1_ad, kn, pe2, pe2_ad, q2, q2_ad, i1, i2, j, ibeg, iend, jbeg, jend, akap, t_var, conserv) |
subroutine | map1_cubic (km, pe1, kn, pe2, q2, i1, i2, j, ibeg, iend, jbeg, jend, akap, t_var, conserv) |
subroutine | map_scalar_fwd (km, pe1, qs, kn, pe2, q2, i1, i2, j, ibeg, iend, jbeg, jend, iv, kord, q_min) |
subroutine | map_scalar_bwd (km, pe1, pe1_ad, qs, kn, pe2, pe2_ad, q2, q2_ad, i1, i2, j, ibeg, iend, jbeg, jend, iv, kord, q_min) |
subroutine | map1_ppm_fwd (km, pe1, qs, kn, pe2, q2, i1, i2, j, ibeg, iend, jbeg, jend, iv, kord) |
subroutine | map1_ppm_bwd (km, pe1, pe1_ad, qs, qs_ad, kn, pe2, pe2_ad, q2, q2_ad, i1, i2, j, ibeg, iend, jbeg, jend, iv, kord) |
subroutine | mapn_tracer_fwd (nq, km, pe1, pe2, q1, dp2, kord, j, i1, i2, isd, ied, jsd, jed, q_min, fill) |
subroutine | mapn_tracer_bwd (nq, km, pe1, pe1_ad, pe2, pe2_ad, q1, q1_ad, dp2, dp2_ad, kord, j, i1, i2, isd, ied, jsd, jed, q_min, fill) |
subroutine, public | map1_q2_fwd (km, pe1, q1, kn, pe2, q2, dp2, i1, i2, iv, kord, j, ibeg, iend, jbeg, jend, q_min) |
subroutine, public | map1_q2_bwd (km, pe1, pe1_ad, q1, q1_ad, kn, pe2, pe2_ad, q2, q2_ad, dp2, dp2_ad, i1, i2, iv, kord, j, ibeg, iend, jbeg, jend, q_min) |
subroutine | scalar_profile_fwd (qs, a4, delp, km, i1, i2, iv, kord, qmin) |
subroutine | scalar_profile_bwd (qs, a4, a4_ad, delp, delp_ad, km, i1, i2, iv, kord, qmin) |
subroutine | cs_profile_fwd (qs, a4, delp, km, i1, i2, iv, kord) |
subroutine | cs_profile_bwd (qs, qs_ad, a4, a4_ad, delp, delp_ad, km, i1, i2, iv, kord) |
Variables | |
real, parameter | consv_min = 0.001 |
real, parameter | t_min = 184. |
real, parameter | r2 =1./2. |
real, parameter | r0 =0.0 |
real, parameter | r3 = 1./3. |
real, parameter | r23 = 2./3. |
real, parameter | r12 = 1./12. |
real, parameter | cv_vap = 3.*rvgas |
real, parameter | cv_air = cp_air - rdgas |
real, parameter | c_ice = 1972. |
real, parameter | c_liq = 4.1855e+3 |
real, parameter | cp_vap = cp_vapor |
real, parameter | tice = 273.16 |
real, public | e_flux = 0. |
subroutine, public fv_mapz_adm_mod::compute_total_energy | ( | integer, intent(in) | is, |
integer, intent(in) | ie, | ||
integer, intent(in) | js, | ||
integer, intent(in) | je, | ||
integer, intent(in) | isd, | ||
integer, intent(in) | ied, | ||
integer, intent(in) | jsd, | ||
integer, intent(in) | jed, | ||
integer, intent(in) | km, | ||
real, dimension(isd:ied, jsd:jed+1, km), intent(inout) | u, | ||
real, dimension(isd:ied+1, jsd:jed, km), intent(inout) | v, | ||
real, dimension(isd:ied, jsd:jed, km), intent(in) | w, | ||
real, dimension(isd:ied, jsd:jed, km), intent(in) | delz, | ||
real, dimension(isd:ied, jsd:jed, km), intent(in) | pt, | ||
real, dimension(isd:ied, jsd:jed, km), intent(in) | delp, | ||
real, dimension(isd:ied, jsd:jed, km, *), intent(in) | q, | ||
real, dimension(isd:ied, jsd:jed, km), intent(in) | qc, | ||
real, dimension(is-1:ie+1, km+1, js-1:je+1), intent(in) | pe, | ||
real, dimension(is:ie, km+1, js:je), intent(in) | peln, | ||
real, dimension(isd:ied, jsd:jed), intent(in) | hs, | ||
real, dimension(isd:ied, jsd:jed), intent(in) | rsin2_l, | ||
real, dimension(isd:ied, jsd:jed), intent(in) | cosa_s_l, | ||
real, intent(in) | r_vir, | ||
real, intent(in) | cp, | ||
real, intent(in) | rg, | ||
real, intent(in) | hlv, | ||
real, dimension(is:ie, js:je), intent(out) | te_2d, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | ua, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | va, | ||
real, dimension(is:ie, js:je), intent(out) | teq, | ||
logical, intent(in) | moist_phys, | ||
integer, intent(in) | nwat, | ||
integer, intent(in) | sphum, | ||
integer, intent(in) | liq_wat, | ||
integer, intent(in) | rainwat, | ||
integer, intent(in) | ice_wat, | ||
integer, intent(in) | snowwat, | ||
integer, intent(in) | graupel, | ||
logical, intent(in) | hydrostatic, | ||
integer, intent(in) | id_te | ||
) |
Definition at line 4767 of file fv_mapz_adm.F90.
subroutine, public fv_mapz_adm_mod::compute_total_energy_bwd | ( | integer, intent(in) | is, |
integer, intent(in) | ie, | ||
integer, intent(in) | js, | ||
integer, intent(in) | je, | ||
integer, intent(in) | isd, | ||
integer, intent(in) | ied, | ||
integer, intent(in) | jsd, | ||
integer, intent(in) | jed, | ||
integer, intent(in) | km, | ||
real, dimension(isd:ied, jsd:jed+1, km), intent(inout) | u, | ||
real, dimension(isd:ied, jsd:jed+1, km), intent(inout) | u_ad, | ||
real, dimension(isd:ied+1, jsd:jed, km), intent(inout) | v, | ||
real, dimension(isd:ied+1, jsd:jed, km), intent(inout) | v_ad, | ||
real, dimension(isd:ied, jsd:jed, km), intent(in) | w, | ||
real, dimension(isd:ied, jsd:jed, km) | w_ad, | ||
real, dimension(isd:ied, jsd:jed, km), intent(in) | delz, | ||
real, dimension(isd:ied, jsd:jed, km) | delz_ad, | ||
real, dimension(isd:ied, jsd:jed, km), intent(in) | pt, | ||
real, dimension(isd:ied, jsd:jed, km) | pt_ad, | ||
real, dimension(isd:ied, jsd:jed, km), intent(in) | delp, | ||
real, dimension(isd:ied, jsd:jed, km) | delp_ad, | ||
real, dimension(isd:ied, jsd:jed, km, *), intent(in) | q, | ||
real, dimension(isd:ied, jsd:jed, km, *) | q_ad, | ||
real, dimension(isd:ied, jsd:jed, km), intent(in) | qc, | ||
real, dimension(isd:ied, jsd:jed, km) | qc_ad, | ||
real, dimension(is-1:ie+1, km+1, js-1:je+1), intent(in) | pe, | ||
real, dimension(is-1:ie+1, km+1, js-1:je+1) | pe_ad, | ||
real, dimension(is:ie, km+1, js:je), intent(in) | peln, | ||
real, dimension(is:ie, km+1, js:je) | peln_ad, | ||
real, dimension(isd:ied, jsd:jed), intent(in) | hs, | ||
real, dimension(isd:ied, jsd:jed), intent(in) | rsin2_l, | ||
real, dimension(isd:ied, jsd:jed), intent(in) | cosa_s_l, | ||
real, intent(in) | r_vir, | ||
real, intent(in) | cp, | ||
real, intent(in) | rg, | ||
real, intent(in) | hlv, | ||
real, dimension(is:ie, js:je) | te_2d, | ||
real, dimension(is:ie, js:je) | te_2d_ad, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | ua, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | va, | ||
real, dimension(is:ie, js:je) | teq, | ||
real, dimension(is:ie, js:je) | teq_ad, | ||
logical, intent(in) | moist_phys, | ||
integer, intent(in) | nwat, | ||
integer, intent(in) | sphum, | ||
integer, intent(in) | liq_wat, | ||
integer, intent(in) | rainwat, | ||
integer, intent(in) | ice_wat, | ||
integer, intent(in) | snowwat, | ||
integer, intent(in) | graupel, | ||
logical, intent(in) | hydrostatic, | ||
integer, intent(in) | id_te | ||
) |
Definition at line 4541 of file fv_mapz_adm.F90.
subroutine, public fv_mapz_adm_mod::compute_total_energy_fwd | ( | integer, intent(in) | is, |
integer, intent(in) | ie, | ||
integer, intent(in) | js, | ||
integer, intent(in) | je, | ||
integer, intent(in) | isd, | ||
integer, intent(in) | ied, | ||
integer, intent(in) | jsd, | ||
integer, intent(in) | jed, | ||
integer, intent(in) | km, | ||
real, dimension(isd:ied, jsd:jed+1, km), intent(inout) | u, | ||
real, dimension(isd:ied+1, jsd:jed, km), intent(inout) | v, | ||
real, dimension(isd:ied, jsd:jed, km), intent(in) | w, | ||
real, dimension(isd:ied, jsd:jed, km), intent(in) | delz, | ||
real, dimension(isd:ied, jsd:jed, km), intent(in) | pt, | ||
real, dimension(isd:ied, jsd:jed, km), intent(in) | delp, | ||
real, dimension(isd:ied, jsd:jed, km, *), intent(in) | q, | ||
real, dimension(isd:ied, jsd:jed, km), intent(in) | qc, | ||
real, dimension(is-1:ie+1, km+1, js-1:je+1), intent(in) | pe, | ||
real, dimension(is:ie, km+1, js:je), intent(in) | peln, | ||
real, dimension(isd:ied, jsd:jed), intent(in) | hs, | ||
real, dimension(isd:ied, jsd:jed), intent(in) | rsin2_l, | ||
real, dimension(isd:ied, jsd:jed), intent(in) | cosa_s_l, | ||
real, intent(in) | r_vir, | ||
real, intent(in) | cp, | ||
real, intent(in) | rg, | ||
real, intent(in) | hlv, | ||
real, dimension(is:ie, js:je) | te_2d, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | ua, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | va, | ||
real, dimension(is:ie, js:je) | teq, | ||
logical, intent(in) | moist_phys, | ||
integer, intent(in) | nwat, | ||
integer, intent(in) | sphum, | ||
integer, intent(in) | liq_wat, | ||
integer, intent(in) | rainwat, | ||
integer, intent(in) | ice_wat, | ||
integer, intent(in) | snowwat, | ||
integer, intent(in) | graupel, | ||
logical, intent(in) | hydrostatic, | ||
integer, intent(in) | id_te | ||
) |
|
private |
Definition at line 13863 of file fv_mapz_adm.F90.
|
private |
Definition at line 13712 of file fv_mapz_adm.F90.
|
private |
Definition at line 12824 of file fv_mapz_adm.F90.
|
private |
Definition at line 10483 of file fv_mapz_adm.F90.
|
private |
Definition at line 20045 of file fv_mapz_adm.F90.
|
private |
Definition at line 19887 of file fv_mapz_adm.F90.
subroutine, public fv_mapz_adm_mod::lagrangian_to_eulerian | ( | logical, intent(in) | last_step, |
real, intent(in) | consv, | ||
real, dimension(isd:ied, jsd:jed), intent(inout) | ps, | ||
real, dimension(is-1:ie+1, km+1, js-1:je+1), intent(inout) | pe, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | delp, | ||
real, dimension(is:ie, js:je, km), intent(out) | pkz, | ||
real, dimension(is:ie, js:je, km+1), intent(inout) | pk, | ||
real, intent(in) | mdt, | ||
real, intent(in) | pdt, | ||
integer, intent(in) | km, | ||
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | js, | ||
integer, intent(in) | je, | ||
integer, intent(in) | isd, | ||
integer, intent(in) | ied, | ||
integer, intent(in) | jsd, | ||
integer, intent(in) | jed, | ||
integer, intent(in) | nq, | ||
integer, intent(in) | nwat, | ||
integer, intent(in) | sphum, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | q_con, | ||
real, dimension(isd:ied, jsd:jed+1, km), intent(inout) | u, | ||
real, dimension(isd:ied+1, jsd:jed, km), intent(inout) | v, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | w, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | delz, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | pt, | ||
real, dimension(isd:ied, jsd:jed, km, nq), intent(inout) | q, | ||
real, dimension(isd:ied, jsd:jed), intent(in) | hs, | ||
real, intent(in) | r_vir, | ||
real, intent(in) | cp, | ||
real, intent(in) | akap, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | cappa, | ||
integer, intent(in) | kord_mt, | ||
integer, intent(in) | kord_wz, | ||
integer, dimension(nq), intent(in) | kord_tr, | ||
integer, intent(in) | kord_tm, | ||
real, dimension(is:ie, km+1, js:je), intent(inout) | peln, | ||
real, dimension(is:ie, js:je), intent(inout) | te0_2d, | ||
integer, intent(in) | ng, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | ua, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | va, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | omga, | ||
real, dimension(isd:ied, jsd:jed, km), intent(out) | te, | ||
real, dimension(is:ie, js:je), intent(in) | ws, | ||
logical, intent(in) | fill, | ||
logical, intent(in) | reproduce_sum, | ||
logical, intent(in) | out_dt, | ||
real, dimension(is:ie, js:je, km), intent(inout) | dtdt, | ||
real, intent(in) | ptop, | ||
real, dimension(km+1), intent(in) | ak, | ||
real, dimension(km+1), intent(in) | bk, | ||
real, dimension(km), intent(in) | pfull, | ||
type(fv_flags_type), intent(inout) | flagstruct, | ||
type(fv_grid_type), intent(in), target | gridstruct, | ||
type(domain2d), intent(inout) | domain, | ||
logical, intent(in) | do_sat_adj, | ||
logical, intent(in) | hydrostatic, | ||
logical, intent(in) | hybrid_z, | ||
logical, intent(in) | do_omega, | ||
logical, intent(in) | adiabatic, | ||
logical, intent(in) | do_adiabatic_init, | ||
real, dimension(is:ie+1, js:je, km), intent(inout), optional | mfx, | ||
real, dimension(is:ie, js:je+1, km), intent(inout), optional | mfy, | ||
integer, intent(in) | remap_option, | ||
integer, intent(in) | kord_mt_pert, | ||
integer, intent(in) | kord_wz_pert, | ||
integer, dimension(nq), intent(in) | kord_tr_pert, | ||
integer, intent(in) | kord_tm_pert | ||
) |
subroutine, public fv_mapz_adm_mod::lagrangian_to_eulerian_bwd | ( | logical, intent(in) | last_step, |
real, intent(in) | consv, | ||
real, dimension(isd:ied, jsd:jed), intent(inout) | ps, | ||
real, dimension(isd:ied, jsd:jed), intent(inout) | ps_ad, | ||
real, dimension(is-1:ie+1, km+1, js-1:je+1), intent(inout) | pe, | ||
real, dimension(is-1:ie+1, km+1, js-1:je+1), intent(inout) | pe_ad, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | delp, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | delp_ad, | ||
real, dimension(is:ie, js:je, km) | pkz, | ||
real, dimension(is:ie, js:je, km) | pkz_ad, | ||
real, dimension(is:ie, js:je, km+1), intent(inout) | pk, | ||
real, dimension(is:ie, js:je, km+1), intent(inout) | pk_ad, | ||
real, intent(in) | mdt, | ||
real, intent(in) | pdt, | ||
integer, intent(in) | km, | ||
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | js, | ||
integer, intent(in) | je, | ||
integer, intent(in) | isd, | ||
integer, intent(in) | ied, | ||
integer, intent(in) | jsd, | ||
integer, intent(in) | jed, | ||
integer, intent(in) | nq, | ||
integer, intent(in) | nwat, | ||
integer, intent(in) | sphum, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | q_con, | ||
real, dimension(isd:ied, jsd:jed+1, km), intent(inout) | u, | ||
real, dimension(isd:ied, jsd:jed+1, km), intent(inout) | u_ad, | ||
real, dimension(isd:ied+1, jsd:jed, km), intent(inout) | v, | ||
real, dimension(isd:ied+1, jsd:jed, km), intent(inout) | v_ad, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | w, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | w_ad, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | delz, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | delz_ad, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | pt, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | pt_ad, | ||
real, dimension(isd:ied, jsd:jed, km, nq), intent(inout) | q, | ||
real, dimension(isd:ied, jsd:jed, km, nq), intent(inout) | q_ad, | ||
real, dimension(isd:ied, jsd:jed), intent(in) | hs, | ||
real, intent(in) | r_vir, | ||
real, intent(in) | cp, | ||
real, intent(in) | akap, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | cappa, | ||
integer, intent(in) | kord_mt, | ||
integer, intent(in) | kord_wz, | ||
integer, dimension(nq), intent(in) | kord_tr, | ||
integer, intent(in) | kord_tm, | ||
real, dimension(is:ie, km+1, js:je), intent(inout) | peln, | ||
real, dimension(is:ie, km+1, js:je), intent(inout) | peln_ad, | ||
real, dimension(is:ie, js:je), intent(inout) | te0_2d, | ||
real, dimension(is:ie, js:je), intent(inout) | te0_2d_ad, | ||
integer, intent(in) | ng, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | ua, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | ua_ad, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | va, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | omga, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | omga_ad, | ||
real, dimension(isd:ied, jsd:jed, km) | te, | ||
real, dimension(isd:ied, jsd:jed, km) | te_ad, | ||
real, dimension(is:ie, js:je), intent(in) | ws, | ||
real, dimension(is:ie, js:je) | ws_ad, | ||
logical, intent(in) | fill, | ||
logical, intent(in) | reproduce_sum, | ||
logical, intent(in) | out_dt, | ||
real, dimension(is:ie, js:je, km), intent(inout) | dtdt, | ||
real, intent(in) | ptop, | ||
real, dimension(km+1), intent(in) | ak, | ||
real, dimension(km+1), intent(in) | bk, | ||
real, dimension(km), intent(in) | pfull, | ||
type(fv_flags_type), intent(inout) | flagstruct, | ||
type(fv_grid_type), intent(in), target | gridstruct, | ||
type(domain2d), intent(inout) | domain, | ||
logical, intent(in) | do_sat_adj, | ||
logical, intent(in) | hydrostatic, | ||
logical, intent(in) | hybrid_z, | ||
logical, intent(in) | do_omega, | ||
logical, intent(in) | adiabatic, | ||
logical, intent(in) | do_adiabatic_init, | ||
real, dimension(is:ie+1, js:je, km), intent(inout), optional | mfx, | ||
real, dimension(is:ie, js:je+1, km), intent(inout), optional | mfy, | ||
integer, intent(in) | remap_option, | ||
integer, intent(in) | kord_mt_pert, | ||
integer, intent(in) | kord_wz_pert, | ||
integer, dimension(nq), intent(in) | kord_tr_pert, | ||
integer, intent(in) | kord_tm_pert | ||
) |
Definition at line 1624 of file fv_mapz_adm.F90.
subroutine, public fv_mapz_adm_mod::lagrangian_to_eulerian_fwd | ( | logical, intent(in) | last_step, |
real, intent(in) | consv, | ||
real, dimension(isd:ied, jsd:jed), intent(inout) | ps, | ||
real, dimension(is-1:ie+1, km+1, js-1:je+1), intent(inout) | pe, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | delp, | ||
real, dimension(is:ie, js:je, km) | pkz, | ||
real, dimension(is:ie, js:je, km+1), intent(inout) | pk, | ||
real, intent(in) | mdt, | ||
real, intent(in) | pdt, | ||
integer, intent(in) | km, | ||
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | js, | ||
integer, intent(in) | je, | ||
integer, intent(in) | isd, | ||
integer, intent(in) | ied, | ||
integer, intent(in) | jsd, | ||
integer, intent(in) | jed, | ||
integer, intent(in) | nq, | ||
integer, intent(in) | nwat, | ||
integer, intent(in) | sphum, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | q_con, | ||
real, dimension(isd:ied, jsd:jed+1, km), intent(inout) | u, | ||
real, dimension(isd:ied+1, jsd:jed, km), intent(inout) | v, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | w, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | delz, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | pt, | ||
real, dimension(isd:ied, jsd:jed, km, nq), intent(inout) | q, | ||
real, dimension(isd:ied, jsd:jed), intent(in) | hs, | ||
real, intent(in) | r_vir, | ||
real, intent(in) | cp, | ||
real, intent(in) | akap, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | cappa, | ||
integer, intent(in) | kord_mt, | ||
integer, intent(in) | kord_wz, | ||
integer, dimension(nq), intent(in) | kord_tr, | ||
integer, intent(in) | kord_tm, | ||
real, dimension(is:ie, km+1, js:je), intent(inout) | peln, | ||
real, dimension(is:ie, js:je), intent(inout) | te0_2d, | ||
integer, intent(in) | ng, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | ua, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | va, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | omga, | ||
real, dimension(isd:ied, jsd:jed, km) | te, | ||
real, dimension(is:ie, js:je), intent(in) | ws, | ||
logical, intent(in) | fill, | ||
logical, intent(in) | reproduce_sum, | ||
logical, intent(in) | out_dt, | ||
real, dimension(is:ie, js:je, km), intent(inout) | dtdt, | ||
real, intent(in) | ptop, | ||
real, dimension(km+1), intent(in) | ak, | ||
real, dimension(km+1), intent(in) | bk, | ||
real, dimension(km), intent(in) | pfull, | ||
type(fv_flags_type), intent(inout) | flagstruct, | ||
type(fv_grid_type), intent(in), target | gridstruct, | ||
type(domain2d), intent(inout) | domain, | ||
logical, intent(in) | do_sat_adj, | ||
logical, intent(in) | hydrostatic, | ||
logical, intent(in) | hybrid_z, | ||
logical, intent(in) | do_omega, | ||
logical, intent(in) | adiabatic, | ||
logical, intent(in) | do_adiabatic_init, | ||
real, dimension(is:ie+1, js:je, km), intent(inout), optional | mfx, | ||
real, dimension(is:ie, js:je+1, km), intent(inout), optional | mfy, | ||
integer, intent(in) | remap_option, | ||
integer, intent(in) | kord_mt_pert, | ||
integer, intent(in) | kord_wz_pert, | ||
integer, dimension(nq), intent(in) | kord_tr_pert, | ||
integer, intent(in) | kord_tm_pert | ||
) |
|
private |
|
private |
Definition at line 17282 of file fv_mapz_adm.F90.
|
private |
Definition at line 16961 of file fv_mapz_adm.F90.
|
private |
Definition at line 5875 of file fv_mapz_adm.F90.
|
private |
Definition at line 5617 of file fv_mapz_adm.F90.
|
private |
Definition at line 18464 of file fv_mapz_adm.F90.
|
private |
Definition at line 18293 of file fv_mapz_adm.F90.
subroutine, public fv_mapz_adm_mod::map1_q2 | ( | integer, intent(in) | km, |
real, dimension(i1:i2, km+1), intent(in) | pe1, | ||
real, dimension(ibeg:iend, jbeg:jend, km), intent(in) | q1, | ||
integer, intent(in) | kn, | ||
real, dimension(i1:i2, kn+1), intent(in) | pe2, | ||
real, dimension(i1:i2, kn), intent(inout) | q2, | ||
real, dimension(i1:i2, kn), intent(in) | dp2, | ||
integer, intent(in) | i1, | ||
integer, intent(in) | i2, | ||
integer, intent(in) | iv, | ||
integer, intent(in) | kord, | ||
integer, intent(in) | j, | ||
integer, intent(in) | ibeg, | ||
integer, intent(in) | iend, | ||
integer, intent(in) | jbeg, | ||
integer, intent(in) | jend, | ||
real, intent(in) | q_min | ||
) |
Definition at line 6709 of file fv_mapz_adm.F90.
|
private |
Definition at line 6461 of file fv_mapz_adm.F90.
subroutine, public fv_mapz_adm_mod::map1_q2_bwd | ( | integer, intent(in) | km, |
real, dimension(i1:i2, km+1), intent(in) | pe1, | ||
real, dimension(i1:i2, km+1) | pe1_ad, | ||
real, dimension(ibeg:iend, jbeg:jend, km), intent(in) | q1, | ||
real, dimension(ibeg:iend, jbeg:jend, km) | q1_ad, | ||
integer, intent(in) | kn, | ||
real, dimension(i1:i2, kn+1), intent(in) | pe2, | ||
real, dimension(i1:i2, kn+1) | pe2_ad, | ||
real, dimension(i1:i2, kn), intent(inout) | q2, | ||
real, dimension(i1:i2, kn), intent(inout) | q2_ad, | ||
real, dimension(i1:i2, kn), intent(in) | dp2, | ||
real, dimension(i1:i2, kn) | dp2_ad, | ||
integer, intent(in) | i1, | ||
integer, intent(in) | i2, | ||
integer, intent(in) | iv, | ||
integer, intent(in) | kord, | ||
integer, intent(in) | j, | ||
integer, intent(in) | ibeg, | ||
integer, intent(in) | iend, | ||
integer, intent(in) | jbeg, | ||
integer, intent(in) | jend, | ||
real, intent(in) | q_min | ||
) |
Definition at line 19292 of file fv_mapz_adm.F90.
subroutine, public fv_mapz_adm_mod::map1_q2_fwd | ( | integer, intent(in) | km, |
real, dimension(i1:i2, km+1), intent(in) | pe1, | ||
real, dimension(ibeg:iend, jbeg:jend, km), intent(in) | q1, | ||
integer, intent(in) | kn, | ||
real, dimension(i1:i2, kn+1), intent(in) | pe2, | ||
real, dimension(i1:i2, kn), intent(inout) | q2, | ||
real, dimension(i1:i2, kn), intent(in) | dp2, | ||
integer, intent(in) | i1, | ||
integer, intent(in) | i2, | ||
integer, intent(in) | iv, | ||
integer, intent(in) | kord, | ||
integer, intent(in) | j, | ||
integer, intent(in) | ibeg, | ||
integer, intent(in) | iend, | ||
integer, intent(in) | jbeg, | ||
integer, intent(in) | jend, | ||
real, intent(in) | q_min | ||
) |
Definition at line 19127 of file fv_mapz_adm.F90.
|
private |
Definition at line 5496 of file fv_mapz_adm.F90.
|
private |
Definition at line 5237 of file fv_mapz_adm.F90.
|
private |
Definition at line 18096 of file fv_mapz_adm.F90.
|
private |
Definition at line 17921 of file fv_mapz_adm.F90.
|
private |
Definition at line 6319 of file fv_mapz_adm.F90.
|
private |
Definition at line 5994 of file fv_mapz_adm.F90.
|
private |
Definition at line 18866 of file fv_mapz_adm.F90.
|
private |
Definition at line 18659 of file fv_mapz_adm.F90.
subroutine, public fv_mapz_adm_mod::mappm | ( | integer, intent(in) | km, |
real, dimension(i1:i2, km+1), intent(in) | pe1, | ||
real, dimension(i1:i2, km), intent(in) | q1, | ||
integer, intent(in) | kn, | ||
real, dimension(i1:i2, kn+1), intent(in) | pe2, | ||
real, dimension(i1:i2, kn), intent(out) | q2, | ||
integer, intent(in) | i1, | ||
integer, intent(in) | i2, | ||
integer, intent(in) | iv, | ||
integer, intent(in) | kord, | ||
real, intent(in) | ptop | ||
) |
subroutine, public fv_mapz_adm_mod::moist_cp | ( | integer, intent(in) | is, |
integer, intent(in) | ie, | ||
integer, intent(in) | isd, | ||
integer, intent(in) | ied, | ||
integer, intent(in) | jsd, | ||
integer, intent(in) | jed, | ||
integer, intent(in) | km, | ||
integer, intent(in) | j, | ||
integer, intent(in) | k, | ||
integer, intent(in) | nwat, | ||
integer, intent(in) | sphum, | ||
integer, intent(in) | liq_wat, | ||
integer, intent(in) | rainwat, | ||
integer, intent(in) | ice_wat, | ||
integer, intent(in) | snowwat, | ||
integer, intent(in) | graupel, | ||
real, dimension(isd:ied, jsd:jed, km, nwat), intent(in) | q, | ||
real, dimension(is:ie), intent(out) | qd, | ||
real, dimension(is:ie), intent(out) | cpm, | ||
real, dimension(is:ie), intent(in), optional | t1 | ||
) |
Definition at line 16845 of file fv_mapz_adm.F90.
subroutine, public fv_mapz_adm_mod::moist_cv | ( | integer, intent(in) | is, |
integer, intent(in) | ie, | ||
integer, intent(in) | isd, | ||
integer, intent(in) | ied, | ||
integer, intent(in) | jsd, | ||
integer, intent(in) | jed, | ||
integer, intent(in) | km, | ||
integer, intent(in) | j, | ||
integer, intent(in) | k, | ||
integer, intent(in) | nwat, | ||
integer, intent(in) | sphum, | ||
integer, intent(in) | liq_wat, | ||
integer, intent(in) | rainwat, | ||
integer, intent(in) | ice_wat, | ||
integer, intent(in) | snowwat, | ||
integer, intent(in) | graupel, | ||
real, dimension(isd:ied, jsd:jed, km, nwat), intent(in) | q, | ||
real, dimension(is:ie), intent(out) | qd, | ||
real, dimension(is:ie), intent(out) | cvm, | ||
real, dimension(is:ie), intent(in), optional | t1 | ||
) |
Definition at line 16755 of file fv_mapz_adm.F90.
|
private |
|
private |
Definition at line 5000 of file fv_mapz_adm.F90.
|
private |
Definition at line 4914 of file fv_mapz_adm.F90.
|
private |
Definition at line 15587 of file fv_mapz_adm.F90.
|
private |
Definition at line 15390 of file fv_mapz_adm.F90.
|
private |
Definition at line 16226 of file fv_mapz_adm.F90.
|
private |
Definition at line 14675 of file fv_mapz_adm.F90.
|
private |
Definition at line 14097 of file fv_mapz_adm.F90.
|
private |
Definition at line 16039 of file fv_mapz_adm.F90.
|
private |
subroutine, public fv_mapz_adm_mod::rst_remap | ( | integer, intent(in) | km, |
integer, intent(in) | kn, | ||
integer, intent(in) | is, | ||
integer, intent(in) | ie, | ||
integer, intent(in) | js, | ||
integer, intent(in) | je, | ||
integer, intent(in) | isd, | ||
integer, intent(in) | ied, | ||
integer, intent(in) | jsd, | ||
integer, intent(in) | jed, | ||
integer, intent(in) | nq, | ||
integer, intent(in) | ntp, | ||
real, dimension(is:ie, js:je, km), intent(in) | delp_r, | ||
real, dimension(is:ie, js:je+1, km), intent(in) | u_r, | ||
real, dimension(is:ie+1, js:je, km), intent(in) | v_r, | ||
real, dimension(is:ie, js:je, km), intent(in) | w_r, | ||
real, dimension(is:ie, js:je, km), intent(inout) | delz_r, | ||
real, dimension(is:ie, js:je, km), intent(inout) | pt_r, | ||
real, dimension(is:ie, js:je, km, ntp), intent(in) | q_r, | ||
real, dimension(is:ie, js:je, km, ntp+1:nq), intent(in) | qdiag_r, | ||
real, dimension(isd:ied, jsd:jed, kn), intent(out) | delp, | ||
real, dimension(isd:ied, jsd:jed+1, kn), intent(out) | u, | ||
real, dimension(isd:ied+1, jsd:jed, kn), intent(out) | v, | ||
real, dimension(isd:, jsd:, :), intent(out) | w, | ||
real, dimension(isd:, jsd:, :), intent(out) | delz, | ||
real, dimension(isd:ied, jsd:jed, kn), intent(out) | pt, | ||
real, dimension(isd:ied, jsd:jed, kn, ntp), intent(out) | q, | ||
real, dimension(isd:ied, jsd:jed, kn, ntp+1:nq), intent(out) | qdiag, | ||
real, dimension(km+1), intent(in) | ak_r, | ||
real, dimension(km+1), intent(in) | bk_r, | ||
real, intent(in) | ptop, | ||
real, dimension(kn+1), intent(in) | ak, | ||
real, dimension(kn+1), intent(in) | bk, | ||
logical, intent(in) | hydrostatic, | ||
logical, intent(in) | make_nh, | ||
type(domain2d), intent(inout) | domain, | ||
logical, intent(in) | square_domain | ||
) |
|
private |
Definition at line 9473 of file fv_mapz_adm.F90.
|
private |
Definition at line 6820 of file fv_mapz_adm.F90.
|
private |
Definition at line 19646 of file fv_mapz_adm.F90.
|
private |
Definition at line 19488 of file fv_mapz_adm.F90.
|
private |
Definition at line 15760 of file fv_mapz_adm.F90.
real, parameter fv_mapz_adm_mod::c_ice = 1972. |
Definition at line 52 of file fv_mapz_adm.F90.
real, parameter fv_mapz_adm_mod::c_liq = 4.1855e+3 |
Definition at line 53 of file fv_mapz_adm.F90.
real, parameter fv_mapz_adm_mod::consv_min = 0.001 |
Definition at line 45 of file fv_mapz_adm.F90.
real, parameter fv_mapz_adm_mod::cp_vap = cp_vapor |
Definition at line 55 of file fv_mapz_adm.F90.
real, parameter fv_mapz_adm_mod::cv_air = cp_air - rdgas |
Definition at line 50 of file fv_mapz_adm.F90.
real, parameter fv_mapz_adm_mod::cv_vap = 3.*rvgas |
Definition at line 49 of file fv_mapz_adm.F90.
real, public fv_mapz_adm_mod::e_flux = 0. |
Definition at line 58 of file fv_mapz_adm.F90.
real, parameter fv_mapz_adm_mod::r0 =0.0 |
Definition at line 47 of file fv_mapz_adm.F90.
real, parameter fv_mapz_adm_mod::r12 = 1./12. |
Definition at line 48 of file fv_mapz_adm.F90.
real, parameter fv_mapz_adm_mod::r2 =1./2. |
Definition at line 47 of file fv_mapz_adm.F90.
real, parameter fv_mapz_adm_mod::r23 = 2./3. |
Definition at line 48 of file fv_mapz_adm.F90.
real, parameter fv_mapz_adm_mod::r3 = 1./3. |
Definition at line 48 of file fv_mapz_adm.F90.
real, parameter fv_mapz_adm_mod::t_min = 184. |
Definition at line 46 of file fv_mapz_adm.F90.
real, parameter fv_mapz_adm_mod::tice = 273.16 |
Definition at line 56 of file fv_mapz_adm.F90.