1SLA_GERCOND(L1A)PACK routine (version 3.2) SLA_GERCOND(1)
2
3
4
6 SLA_GERCOND - SLA_GERCOND estimate the Skeel condition number of op(A)
7 * op2(C) where op2 is determined by CMODE as follows CMODE = 1 op2(C)
8 = C CMODE = 0 op2(C) = I CMODE = -1 op2(C) = inv(C) The Skeel condiā
9 tion number cond(A) = norminf( |inv(A)||A| ) is computed by computing
10 scaling factors R such that diag(R)*A*op2(C) is row equilibrated and
11 computing the standard infinity-norm condition number
12
14 REAL FUNCTION SLA_GERCOND ( TRANS, N, A, LDA, AF, LDAF, IPIV, CMODE, C,
15 INFO, WORK, IWORK )
16
17 IMPLICIT NONE
18
19 CHARACTER TRANS
20
21 INTEGER N, LDA, LDAF, INFO, CMODE
22
23 INTEGER IPIV( * ), IWORK( * )
24
25 REAL A( LDA, * ), AF( LDAF, * ), WORK( * ), C( * )
26
28 SLA_GERCOND estimates the Skeel condition number of op(A) * op2(C)
29 where op2 is determined by CMODE as follows
30 CMODE = 1 op2(C) = C
31 CMODE = 0 op2(C) = I
32 CMODE = -1 op2(C) = inv(C)
33 The Skeel condition number cond(A) = norminf( |inv(A)||A| )
34 is computed by computing scaling factors R such that
35 diag(R)*A*op2(C) is row equilibrated and computing the standard
36 infinity-norm condition number.
37
39 WORK REAL workspace of size 3*N.
40
41 IWORK INTEGER workspace of size N.
42
43
44
45 LAPACK routine (version 3.2) November 2008 SLA_GERCOND(1)