Go to the source code of this file.
|
subroutine | source_phi (S_P, S_C, EP, PHI, M, A_M, B_M) |
|
subroutine | point_source_phi (PHI, PS_PHI, PS_FLOW, M, A_M, B_M) |
|
subroutine point_source_phi |
( |
double precision, dimension(dimension_3), intent(in) |
PHI, |
|
|
double precision, dimension(dimension_bc), intent(in) |
PS_PHI, |
|
|
double precision, dimension(dimension_bc), intent(in) |
PS_FLOW, |
|
|
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 source_phi |
( |
double precision, dimension(dimension_3), intent(in) |
S_P, |
|
|
double precision, dimension(dimension_3), intent(in) |
S_C, |
|
|
double precision, dimension(dimension_3), intent(in) |
EP, |
|
|
double precision, dimension(dimension_3), intent(in) |
PHI, |
|
|
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 |
|
) |
| |