FV3 Bundle
|
Functions/Subroutines | |
subroutine, public | riem_solver3_fwd (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, public | riem_solver3_bwd (ms, dt, is, ie, js, je, km, ng, isd, ied, jsd, jed, akap, cappa, cp, ptop, zs, q_con, w, w_ad, delz, delz_ad, pt, pt_ad, delp, delp_ad, zh, zh_ad, pe, pe_ad, ppe, ppe_ad, pk3, pk3_ad, pk, pk_ad, peln, peln_ad, ws, ws_ad, scale_m, p_fac, a_imp, use_logp, last_call, fp_out) |
subroutine, public | riem_solver3 (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) |
Variables | |
real, parameter | r3 = 1./3. |
subroutine, public nh_core_adm_mod::riem_solver3 | ( | 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, | ||
integer, intent(in) | isd, | ||
integer, intent(in) | ied, | ||
integer, intent(in) | jsd, | ||
integer, intent(in) | jed, | ||
real, intent(in) | akap, | ||
real, dimension(isd:, jsd:, :), intent(in) | cappa, | ||
real, intent(in) | cp, | ||
real, intent(in) | ptop, | ||
real, dimension(isd:ied, jsd:jed), intent(in) | zs, | ||
real, dimension(isd:, jsd:, :), intent(in) | q_con, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | w, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km), intent(out) | 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+1), intent(inout) | zh, | ||
real, dimension(is-1:ie+1, km+1, js-1:je+1), intent(inout) | pe, | ||
real, dimension(isd:ied, jsd:jed, km+1), intent(out) | ppe, | ||
real, dimension(isd:ied, jsd:jed, km+1), intent(out) | pk3, | ||
real, dimension(is:ie, js:je, km+1), intent(out) | pk, | ||
real, dimension(is:ie, km+1, js:je), intent(out) | peln, | ||
real, dimension(is:ie, js:je), intent(in) | ws, | ||
real, intent(in) | scale_m, | ||
real, intent(in) | p_fac, | ||
real, intent(in) | a_imp, | ||
logical, intent(in) | use_logp, | ||
logical, intent(in) | last_call, | ||
logical, intent(in) | fp_out | ||
) |
Definition at line 539 of file nh_core_adm.F90.
subroutine, public nh_core_adm_mod::riem_solver3_bwd | ( | 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, | ||
integer, intent(in) | isd, | ||
integer, intent(in) | ied, | ||
integer, intent(in) | jsd, | ||
integer, intent(in) | jed, | ||
real, intent(in) | akap, | ||
real, dimension(isd:, jsd:, :), intent(in) | cappa, | ||
real, intent(in) | cp, | ||
real, intent(in) | ptop, | ||
real, dimension(isd:ied, jsd:jed), intent(in) | zs, | ||
real, dimension(isd:, jsd:, :), intent(in) | q_con, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | w, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | w_ad, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km) | delz, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, 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+1), intent(inout) | zh, | ||
real, dimension(isd:ied, jsd:jed, km+1), intent(inout) | zh_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+1) | ppe, | ||
real, dimension(isd:ied, jsd:jed, km+1) | ppe_ad, | ||
real, dimension(isd:ied, jsd:jed, km+1) | pk3, | ||
real, dimension(isd:ied, jsd:jed, km+1) | pk3_ad, | ||
real, dimension(is:ie, js:je, km+1) | pk, | ||
real, dimension(is:ie, js:je, km+1) | pk_ad, | ||
real, dimension(is:ie, km+1, js:je) | peln, | ||
real, dimension(is:ie, km+1, js:je) | peln_ad, | ||
real, dimension(is:ie, js:je), intent(in) | ws, | ||
real, dimension(is:ie, js:je) | ws_ad, | ||
real, intent(in) | scale_m, | ||
real, intent(in) | p_fac, | ||
real, intent(in) | a_imp, | ||
logical, intent(in) | use_logp, | ||
logical, intent(in) | last_call, | ||
logical, intent(in) | fp_out | ||
) |
Definition at line 307 of file nh_core_adm.F90.
subroutine, public nh_core_adm_mod::riem_solver3_fwd | ( | 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, | ||
integer, intent(in) | isd, | ||
integer, intent(in) | ied, | ||
integer, intent(in) | jsd, | ||
integer, intent(in) | jed, | ||
real, intent(in) | akap, | ||
real, dimension(isd:, jsd:, :), intent(in) | cappa, | ||
real, intent(in) | cp, | ||
real, intent(in) | ptop, | ||
real, dimension(isd:ied, jsd:jed), intent(in) | zs, | ||
real, dimension(isd:, jsd:, :), intent(in) | q_con, | ||
real, dimension(isd:ied, jsd:jed, km), intent(inout) | w, | ||
real, dimension(is-ng:ie+ng, js-ng:je+ng, km) | 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+1), intent(inout) | zh, | ||
real, dimension(is-1:ie+1, km+1, js-1:je+1), intent(inout) | pe, | ||
real, dimension(isd:ied, jsd:jed, km+1) | ppe, | ||
real, dimension(isd:ied, jsd:jed, km+1) | pk3, | ||
real, dimension(is:ie, js:je, km+1) | pk, | ||
real, dimension(is:ie, km+1, js:je) | peln, | ||
real, dimension(is:ie, js:je), intent(in) | ws, | ||
real, intent(in) | scale_m, | ||
real, intent(in) | p_fac, | ||
real, intent(in) | a_imp, | ||
logical, intent(in) | use_logp, | ||
logical, intent(in) | last_call, | ||
logical, intent(in) | fp_out | ||
) |
|
private |
Definition at line 50 of file nh_core_adm.F90.