Go to the source code of this file.
|
subroutine | sd_sro (N, IP, IA, JA, A, Q, R, DFLAG) |
|
◆ sd_sro()
subroutine sd_sro |
( |
integer, intent(in) |
N, |
|
|
integer, dimension(*), intent(in) |
IP, |
|
|
integer, dimension(*), intent(inout) |
IA, |
|
|
integer, dimension(*), intent(inout) |
JA, |
|
|
double precision, dimension(*), intent(inout) |
A, |
|
|
integer, dimension(n), intent(inout) |
Q, |
|
|
integer, dimension(*), intent(inout) |
R, |
|
|
logical, intent(in) |
DFLAG |
|
) |
| |
- Parameters
-
[in] | n | [—] A Nonzero element of matrix |
[in] | DFLAG | Logical variable; if dflag = .true., then STORE NONZERO DIAGONAL ELEMENTS AT THE BEGINNING OF THE ROW |
| | |
Definition at line 7 of file sd_sro.f.