Go to the source code of this file.
|
subroutine | sd_ssf (N, P, IP, IA, JA, IJU, JU, IU, JUMAX, Q, MARK, JL, FLAG) |
|
◆ sd_ssf()
subroutine sd_ssf |
( |
integer, intent(in) |
N, |
|
|
integer, dimension(n), intent(inout) |
P, |
|
|
integer, dimension(n), intent(inout) |
IP, |
|
|
integer, dimension(n+1), intent(inout) |
IA, |
|
|
integer, dimension(*), intent(inout) |
JA, |
|
|
integer, dimension(n), intent(inout) |
IJU, |
|
|
integer, dimension(jumax), intent(inout) |
JU, |
|
|
integer, dimension(n+1), intent(inout) |
IU, |
|
|
integer, intent(in) |
JUMAX, |
|
|
integer, dimension(n), intent(inout) |
Q, |
|
|
integer, dimension(n), intent(inout) |
MARK, |
|
|
integer, dimension(n), intent(inout) |
JL, |
|
|
integer, intent(inout) |
FLAG |
|
) |
| |
- Parameters
-
[in] | n | [out] FLAG Logical variable; if dflag = .true., then STORE NONZERO DIAGONAL ELEMENTS AT THE BEGINNING OF THE ROW |
[out] | IA | Integer one-dimensional array containing POINTERS TO DELIMIT ROWS IN JA AND A; DIMENSION = N+1 |
| | |
Definition at line 7 of file sd_ssf.f.