|
| subroutine, public | advance_wp2_wp3_module::advance_wp2_wp3 (dt, sfc_elevation, sigma_sqd_w, wm_zm, wm_zt, a3, a3_zt, wp3_on_wp2, wpthvp, wp2thvp, um, vm, upwp, vpwp, up2, vp2, Kh_zm, Kh_zt, tau_zm, tau_zt, tau_C1_zm, Skw_zm, Skw_zt, rho_ds_zm, rho_ds_zt, invrs_rho_ds_zm, invrs_rho_ds_zt, radf, thv_ds_zm, thv_ds_zt, mixt_frac, wp2, wp3, wp3_zm, wp2_zt, err_code) |
| |
| subroutine, private | advance_wp2_wp3_module::wp23_solve (dt, sfc_elevation, sigma_sqd_w, wm_zm, wm_zt, a3, a3_zt, wp3_on_wp2, wpthvp, wp2thvp, um, vm, upwp, vpwp, up2, vp2, Kw1, Kw8, Kh_zt, Skw_zt, tau1m, tauw3t, tau_C1_zm, C1_Skw_fnc, C11_Skw_fnc, rho_ds_zm, rho_ds_zt, invrs_rho_ds_zm, invrs_rho_ds_zt, radf, thv_ds_zm, thv_ds_zt, nsub, nsup, wp2, wp3, wp3_zm, wp2_zt, err_code) |
| |
| subroutine | advance_wp2_wp3_module::wp23_gmres (dt, wp2, wm_zm, wm_zt, a1, a1_zt, a3, a3_zt, wp3_on_wp2, Kw1, Kw8, Skw_zt, tau1m, tauw3t, tau_C1_zm, C1_Skw_fnc, C11_Skw_fnc, rho_ds_zm, rho_ds_zt, invrs_rho_ds_zm, invrs_rho_ds_zt, l_crank_nich_diff, nsup, nsub, nrhs, rhs, solut, err_code) |
| |
| subroutine, private | advance_wp2_wp3_module::wp23_lhs (dt, wp2, wm_zm, wm_zt, a1, a1_zt, a3, a3_zt, wp3_on_wp2, Kw1, Kw8, Skw_zt, tau1m, tauw3t, tau_C1_zm, C1_Skw_fnc, C11_Skw_fnc, rho_ds_zm, rho_ds_zt, invrs_rho_ds_zm, invrs_rho_ds_zt, l_crank_nich_diff, nsub, nsup, lhs) |
| |
| subroutine | advance_wp2_wp3_module::wp23_lhs_csr (dt, wp2, wm_zm, wm_zt, a1, a1_zt, a3, a3_zt, wp3_on_wp2, Kw1, Kw8, Skw_zt, tau1m, tauw3t, tau_C1_zm, C1_Skw_fnc, C11_Skw_fnc, rho_ds_zm, rho_ds_zt, invrs_rho_ds_zm, invrs_rho_ds_zt, l_crank_nich_diff, lhs_a_csr) |
| |
| subroutine, private | advance_wp2_wp3_module::wp23_rhs (dt, wp2, wp3, a1, a1_zt, a3, a3_zt, wp3_on_wp2, wpthvp, wp2thvp, um, vm, upwp, vpwp, up2, vp2, Kw1, Kw8, Kh_zt, Skw_zt, tau1m, tauw3t, tau_C1_zm, C1_Skw_fnc, C11_Skw_fnc, rho_ds_zm, invrs_rho_ds_zt, radf, thv_ds_zm, thv_ds_zt, l_crank_nich_diff, rhs) |
| |
| pure real(kind=core_rknd) function, dimension(2), private | advance_wp2_wp3_module::wp2_term_ta_lhs (rho_ds_ztp1, rho_ds_zt, invrs_rho_ds_zm, invrs_dzm) |
| |
| pure real(kind=core_rknd) function, private | advance_wp2_wp3_module::wp2_terms_ac_pr2_lhs (C5, wm_ztp1, wm_zt, invrs_dzm) |
| |
| pure real(kind=core_rknd) function, private | advance_wp2_wp3_module::wp2_term_dp1_lhs (C1_Skw_fnc, tau1m) |
| |
| pure real(kind=core_rknd) function, private | advance_wp2_wp3_module::wp2_term_pr1_lhs (C4, tau1m) |
| |
| pure real(kind=core_rknd) function, private | advance_wp2_wp3_module::wp2_terms_bp_pr2_rhs (C5, thv_ds_zm, wpthvp) |
| |
| pure real(kind=core_rknd) function, private | advance_wp2_wp3_module::wp2_term_dp1_rhs (C1_Skw_fnc, tau1m, threshold) |
| |
| pure real(kind=core_rknd) function, private | advance_wp2_wp3_module::wp2_term_pr3_rhs (C5, thv_ds_zm, wpthvp, upwp, ump1, um, vpwp, vmp1, vm, invrs_dzm) |
| |
| pure real(kind=core_rknd) function, private | advance_wp2_wp3_module::wp2_term_pr1_rhs (C4, up2, vp2, tau1m) |
| |
| pure real(kind=core_rknd) function, dimension(5), private | advance_wp2_wp3_module::wp3_terms_ta_tp_lhs (wp2, wp2m1, a1, a1_zt, a1m1, a3, a3_zt, a3m1, wp3_on_wp2, wp3_on_wp2_m1, rho_ds_zm, rho_ds_zmm1, invrs_rho_ds_zt, const_three_halves, invrs_dzt, level) |
| |
| pure real(kind=core_rknd) function, private | advance_wp2_wp3_module::wp3_terms_ac_pr2_lhs (C11_Skw_fnc, wm_zm, wm_zmm1, invrs_dzt) |
| |
| pure real(kind=core_rknd) function, private | advance_wp2_wp3_module::wp3_term_pr1_lhs (C8, C8b, tauw3t, Skw_zt) |
| |
| pure real(kind=core_rknd) function, private | advance_wp2_wp3_module::wp3_terms_bp1_pr2_rhs (C11_Skw_fnc, thv_ds_zt, wp2thvp) |
| |
| pure real(kind=core_rknd) function, private | advance_wp2_wp3_module::wp3_term_bp2_rhs (C15, Kh_zt, wpthvp, wpthvp_m1, dum_dz, dum_dz_m1, dvm_dz, dvm_dz_m1, upwp, upwp_m1, vpwp, vpwp_m1, thv_ds_zt, invrs_dzt) |
| |
| pure real(kind=core_rknd) function, private | advance_wp2_wp3_module::wp3_term_pr1_rhs (C8, C8b, tauw3t, Skw_zt, wp3) |
| |
1.8.13