Go to the source code of this file.
|
subroutine | partial_elim_ghd_u (VAR_G, VAR_S, VXF, A_M, B_M) |
|
subroutine | partial_elim_ghd_v (VAR_G, VAR_S, VXF, A_M, B_M) |
|
subroutine | partial_elim_ghd_w (VAR_G, VAR_S, VXF, A_M, B_M) |
|
subroutine partial_elim_ghd_u |
( |
double precision, dimension(dimension_3) |
VAR_G, |
|
|
double precision, dimension(dimension_3, dimension_m) |
VAR_S, |
|
|
double precision, dimension(dimension_3, dimension_m) |
VXF, |
|
|
double precision, dimension(dimension_3, -3:3, 0:dimension_m) |
A_M, |
|
|
double precision, dimension(dimension_3, 0:dimension_m) |
B_M |
|
) |
| |
subroutine partial_elim_ghd_v |
( |
double precision, dimension(dimension_3) |
VAR_G, |
|
|
double precision, dimension(dimension_3, dimension_m) |
VAR_S, |
|
|
double precision, dimension(dimension_3, dimension_m) |
VXF, |
|
|
double precision, dimension(dimension_3, -3:3, 0:dimension_m) |
A_M, |
|
|
double precision, dimension(dimension_3, 0:dimension_m) |
B_M |
|
) |
| |
subroutine partial_elim_ghd_w |
( |
double precision, dimension(dimension_3) |
VAR_G, |
|
|
double precision, dimension(dimension_3, dimension_m) |
VAR_S, |
|
|
double precision, dimension(dimension_3, dimension_m) |
VXF, |
|
|
double precision, dimension(dimension_3, -3:3, 0:dimension_m) |
A_M, |
|
|
double precision, dimension(dimension_3, 0:dimension_m) |
B_M |
|
) |
| |