LAPACK
3.6.1
LAPACK: Linear Algebra PACKage
|
subroutine slacn2 | ( | integer | N, |
real, dimension( * ) | V, | ||
real, dimension( * ) | X, | ||
integer, dimension( * ) | ISGN, | ||
real | EST, | ||
integer | KASE, | ||
integer, dimension( 3 ) | ISAVE | ||
) |
SLACN2 estimates the 1-norm of a square matrix, using reverse communication for evaluating matrix-vector products.
Download SLACN2 + dependencies [TGZ] [ZIP] [TXT]
SLACN2 estimates the 1-norm of a square, real matrix A. Reverse communication is used for evaluating matrix-vector products.
[in] | N | N is INTEGER The order of the matrix. N >= 1. |
[out] | V | V is REAL array, dimension (N) On the final return, V = A*W, where EST = norm(V)/norm(W) (W is not returned). |
[in,out] | X | X is REAL array, dimension (N) On an intermediate return, X should be overwritten by A * X, if KASE=1, A**T * X, if KASE=2, and SLACN2 must be re-called with all the other parameters unchanged. |
[out] | ISGN | ISGN is INTEGER array, dimension (N) |
[in,out] | EST | EST is REAL On entry with KASE = 1 or 2 and ISAVE(1) = 3, EST should be unchanged from the previous call to SLACN2. On exit, EST is an estimate (a lower bound) for norm(A). |
[in,out] | KASE | KASE is INTEGER On the initial call to SLACN2, KASE should be 0. On an intermediate return, KASE will be 1 or 2, indicating whether X should be overwritten by A * X or A**T * X. On the final return from SLACN2, KASE will again be 0. |
[in,out] | ISAVE | ISAVE is INTEGER array, dimension (3) ISAVE is used to save variables between calls to SLACN2 |
Originally named SONEST, dated March 16, 1988. This is a thread safe version of SLACON, which uses the array ISAVE in place of a SAVE statement, as follows: SLACON SLACN2 JUMP ISAVE(1) J ISAVE(2) ITER ISAVE(3)
Definition at line 138 of file slacn2.f.