Go to the source code of this file.
|
subroutine | leq_bicgst (VNAME, VNO, VAR, A_M, B_m, cmethod, TOL, PC |
|
subroutine | leq_bicgs0t (VNAME, VNO, VAR, A_M, B_m, cmethod, TOL, I |
|
subroutine | leq_isweept (I, Vname, VAR, A_M, B_M) |
|
subroutine | leq_iksweept (I, K, Vname, VAR, A_M, B_M) |
|
subroutine | leq_matvect (VNAME, VAR, A_M, Avar) |
|
subroutine | leq_msolvet (VNAME, B_m, A_M, Var, CMETHOD) |
|
subroutine | leq_jksweept (J, K, Vname, VAR, A_M, B_M) |
|
subroutine | leq_ijsweept (I, J, Vname, VAR, A_M, B_M) |
|
subroutine | leq_msolve0t (VNAME, B_m, A_M, Var, CMETHOD) |
|
subroutine | leq_msolve1t (VNAME, B_m, A_M, Var, CMETHOD) |
|
subroutine leq_bicgs0t |
( |
character(len=*) |
VNAME, |
|
|
integer |
VNO, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
VAR, |
|
|
double precision, dimension(-3:3,ijkstart3:ijkend3) |
A_M, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
B_m, |
|
|
character(len=*) |
cmethod, |
|
|
double precision |
TOL, |
|
|
integer |
I |
|
) |
| |
subroutine leq_bicgst |
( |
character(len=*) |
VNAME, |
|
|
integer |
VNO, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
VAR, |
|
|
double precision, dimension(-3:3,ijkstart3:ijkend3) |
A_M, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
B_m, |
|
|
character(len=*) |
cmethod, |
|
|
double precision |
TOL, |
|
|
character(len=4) |
PC |
|
) |
| |
subroutine leq_ijsweept |
( |
integer |
I, |
|
|
integer |
J, |
|
|
character(len=*) |
Vname, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
VAR, |
|
|
double precision, dimension(-3:3, ijkstart3:ijkend3) |
A_M, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
B_M |
|
) |
| |
subroutine leq_iksweept |
( |
integer |
I, |
|
|
integer |
K, |
|
|
character(len=*) |
Vname, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
VAR, |
|
|
double precision, dimension(-3:3,ijkstart3:ijkend3) |
A_M, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
B_M |
|
) |
| |
subroutine leq_isweept |
( |
integer |
I, |
|
|
character(len=*) |
Vname, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
VAR, |
|
|
double precision, dimension(-3:3,ijkstart3:ijkend3) |
A_M, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
B_M |
|
) |
| |
subroutine leq_jksweept |
( |
integer |
J, |
|
|
integer |
K, |
|
|
character(len=*) |
Vname, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
VAR, |
|
|
double precision, dimension(-3:3, ijkstart3:ijkend3) |
A_M, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
B_M |
|
) |
| |
subroutine leq_matvect |
( |
character(len=*) |
VNAME, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
VAR, |
|
|
double precision, dimension(-3:3, ijkstart3:ijkend3) |
A_M, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
Avar |
|
) |
| |
subroutine leq_msolve0t |
( |
character(len=*) |
VNAME, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
B_m, |
|
|
double precision, dimension(-3:3, ijkstart3:ijkend3) |
A_M, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
Var, |
|
|
character(len=4) |
CMETHOD |
|
) |
| |
subroutine leq_msolve1t |
( |
character(len=*) |
VNAME, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
B_m, |
|
|
double precision, dimension(-3:3, ijkstart3:ijkend3) |
A_M, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
Var, |
|
|
character(len=4) |
CMETHOD |
|
) |
| |
subroutine leq_msolvet |
( |
character(len=*) |
VNAME, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
B_m, |
|
|
double precision, dimension(-3:3, ijkstart3:ijkend3) |
A_M, |
|
|
double precision, dimension(ijkstart3:ijkend3) |
Var, |
|
|
character(len=4) |
CMETHOD |
|
) |
| |