Go to the source code of this file.
|
| subroutine | calc_d_n (A_M, VXF_GS, VXF_SS, D_N, IER) |
| |
| subroutine | calc_d_n_gas_and_solids (AM0, VXF_GS, VXF_SS, D_N) |
| |
| subroutine | calc_d_n_gas_only (AM0, VXF_GS, D_N) |
| |
| subroutine | calc_d_n_solids_only (AM0, VXF_GS, VXF_SS, D_N) |
| |
| subroutine calc_d_n |
( |
double precision, dimension(dimension_3,-3:3,0:dimension_m), intent(in) |
A_M, |
|
|
double precision, dimension(dimension_3, dimension_m), intent(in) |
VXF_GS, |
|
|
double precision, dimension(dimension_3, dimension_lm), intent(in) |
VXF_SS, |
|
|
double precision, dimension(dimension_3, 0:dimension_m), intent(out) |
D_N, |
|
|
integer, intent(out) |
IER |
|
) |
| |
| subroutine calc_d_n_gas_and_solids |
( |
double precision, dimension(dimension_3, 0:dimension_m), intent(in) |
AM0, |
|
|
double precision, dimension(dimension_3, dimension_m), intent(in) |
VXF_GS, |
|
|
double precision, dimension(dimension_3, dimension_lm), intent(in) |
VXF_SS, |
|
|
double precision, dimension(dimension_3, 0:dimension_m), intent(inout) |
D_N |
|
) |
| |
| subroutine calc_d_n_gas_only |
( |
double precision, dimension(dimension_3, 0:dimension_m), intent(in) |
AM0, |
|
|
double precision, dimension(dimension_3, dimension_m), intent(in) |
VXF_GS, |
|
|
double precision, dimension(dimension_3, 0:dimension_m), intent(inout) |
D_N |
|
) |
| |
| subroutine calc_d_n_solids_only |
( |
double precision, dimension(dimension_3, 0:dimension_m), intent(in) |
AM0, |
|
|
double precision, dimension(dimension_3, dimension_m), intent(in) |
VXF_GS, |
|
|
double precision, dimension(dimension_3, dimension_lm), intent(in) |
VXF_SS, |
|
|
double precision, dimension(dimension_3, 0:dimension_m), intent(inout) |
D_N |
|
) |
| |