Go to the source code of this file.
|
subroutine | calc_mflux () |
|
subroutine | calc_mflux0 (U, V, W, ROP_E, ROP_N, ROP_T, Flux_E, Flux_N, Flux_T) |
|
subroutine | calc_mflux_am (U, V, W, ROP_E, ROP_N, ROP_T, ROPa_E, ROPa_N, ROPa_T, Flux_E, Flux_N, Flux_T, M_AM) |
|
subroutine calc_mflux |
( |
| ) |
|
subroutine calc_mflux0 |
( |
double precision, dimension(dimension_3), intent(in) |
U, |
|
|
double precision, dimension(dimension_3), intent(in) |
V, |
|
|
double precision, dimension(dimension_3), intent(in) |
W, |
|
|
double precision, dimension(dimension_3), intent(in) |
ROP_E, |
|
|
double precision, dimension(dimension_3), intent(in) |
ROP_N, |
|
|
double precision, dimension(dimension_3), intent(in) |
ROP_T, |
|
|
double precision, dimension(dimension_3), intent(out) |
Flux_E, |
|
|
double precision, dimension(dimension_3), intent(out) |
Flux_N, |
|
|
double precision, dimension(dimension_3), intent(out) |
Flux_T |
|
) |
| |
subroutine calc_mflux_am |
( |
double precision, dimension(dimension_3), intent(in) |
U, |
|
|
double precision, dimension(dimension_3), intent(in) |
V, |
|
|
double precision, dimension(dimension_3), intent(in) |
W, |
|
|
double precision, dimension(dimension_3), intent(in) |
ROP_E, |
|
|
double precision, dimension(dimension_3), intent(in) |
ROP_N, |
|
|
double precision, dimension(dimension_3), intent(in) |
ROP_T, |
|
|
double precision, dimension(dimension_3), intent(in) |
ROPa_E, |
|
|
double precision, dimension(dimension_3), intent(in) |
ROPa_N, |
|
|
double precision, dimension(dimension_3), intent(in) |
ROPa_T, |
|
|
double precision, dimension(dimension_3), intent(out) |
Flux_E, |
|
|
double precision, dimension(dimension_3), intent(out) |
Flux_N, |
|
|
double precision, dimension(dimension_3), intent(out) |
Flux_T, |
|
|
integer, intent(in) |
M_AM |
|
) |
| |