Go to the source code of this file.
|
subroutine | conv_dif_v_g (A_M, B_M, IER) |
|
subroutine | get_vcell_gvterms (U, V, WW) |
|
subroutine | get_vcell_gcflux_terms (FLUX_E, FLUX_W, FLUX_N, FLUX_S, FLUX_T, FLUX_B, IJK) |
|
subroutine | get_vcell_gdiff_terms (D_FE, D_FW, D_FN, D_FS, D_FT, D_FB, IJK) |
|
subroutine | store_a_v_g0 (A_V_G) |
|
subroutine | store_a_v_gdc (B_M) |
|
subroutine | store_a_v_g1 (A_V_G) |
|
subroutine conv_dif_v_g |
( |
double precision, dimension(dimension_3, -3:3, 0:dimens! ion_m), intent(inout) |
A_M, |
|
|
double precision, dimension(dimension_3, 0:dimension_m), intent(inout) |
B_M, |
|
|
integer, intent(inout) |
IER |
|
) |
| |
subroutine get_vcell_gcflux_terms |
( |
double precision, intent(out) |
FLUX_E, |
|
|
double precision, intent(out) |
FLUX_W, |
|
|
double precision, intent(out) |
FLUX_N, |
|
|
double precision, intent(out) |
FLUX_S, |
|
|
double precision, intent(out) |
FLUX_T, |
|
|
double precision, intent(out) |
FLUX_B, |
|
|
integer, intent(in) |
IJK |
|
) |
| |
subroutine get_vcell_gdiff_terms |
( |
double precision, intent(out) |
D_FE, |
|
|
double precision, intent(out) |
D_FW, |
|
|
double precision, intent(out) |
D_FN, |
|
|
double precision, intent(out) |
D_FS, |
|
|
double precision, intent(out) |
D_FT, |
|
|
double precision, intent(out) |
D_FB, |
|
|
integer, intent(in) |
IJK |
|
) |
| |
subroutine get_vcell_gvterms |
( |
double precision, dimension(dimension_3), intent(out) |
U, |
|
|
double precision, dimension(dimension_3), intent(out) |
V, |
|
|
double precision, dimension(dimension_3), intent(out) |
WW |
|
) |
| |
subroutine store_a_v_g0 |
( |
double precision, dimension(dimension_3, -3:3, 0:dime! nsion_m), intent(inout) |
A_V_G | ) |
|
subroutine store_a_v_g1 |
( |
double precision, dimension(dimension_3, -3:3), intent(inout) |
A_V_G | ) |
|
subroutine store_a_v_gdc |
( |
double precision, dimension(dimension_3), intent(inout) |
B_M | ) |
|