Go to the source code of this file.
|
subroutine | source_w_s (A_M, B_M) |
|
subroutine | source_w_s_bc (A_M, B_M, M) |
|
subroutine | jj_bc_w_s (I1, I2, J1, J2, K1, K2, L, M, A_M, B_M) |
|
subroutine | point_source_w_s (A_M, B_M) |
|
subroutine jj_bc_w_s |
( |
integer, intent(in) |
I1, |
|
|
integer, intent(in) |
I2, |
|
|
integer, intent(in) |
J1, |
|
|
integer, intent(in) |
J2, |
|
|
integer, intent(in) |
K1, |
|
|
integer, intent(in) |
K2, |
|
|
integer, intent(in) |
L, |
|
|
integer, intent(in) |
M, |
|
|
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 point_source_w_s |
( |
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 source_w_s |
( |
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 source_w_s_bc |
( |
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(in) |
M |
|
) |
| |