Go to the source code of this file.
|
subroutine | conv_dif_u_g (A_M, B_M) |
|
subroutine | get_ucell_gvterms (U, V, WW) |
|
subroutine | get_ucell_gcflux_terms (FLUX_E, FLUX_W, FLUX_N, FLUX_S, FLUX_T, FLUX_B, IJK) |
|
subroutine | get_ucell_gdiff_terms (D_FE, D_FW, D_FN, D_FS, D_FT, D_FB, IJK) |
|
subroutine | store_a_u_g0 (A_U_G) |
|
subroutine | store_a_u_gdc (B_M) |
|
subroutine | store_a_u_g1 (A_U_G) |
|
subroutine conv_dif_u_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 |
|
) |
| |
subroutine get_ucell_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_ucell_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_ucell_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_u_g0 |
( |
double precision, dimension(dimension_3, -3:3, 0:dime! nsion_m), intent(inout) |
A_U_G | ) |
|
subroutine store_a_u_g1 |
( |
double precision, dimension(dimension_3, -3:3, 0:dime! nsion_m), intent(inout) |
A_U_G | ) |
|
subroutine store_a_u_gdc |
( |
double precision, dimension(dimension_3), intent(inout) |
B_M | ) |
|