NAME¶

SLA_GBRCOND - SLA_GERCOND Estimate the Skeel condition number of op(A) * op2(C) where op2 is determined by CMODE as follows CMODE = 1 op2(C) = C CMODE = 0 op2(C) = I CMODE = -1 op2(C) = inv(C) The Skeel condition number cond(A) = norminf( |inv(A)||A| ) is computed by computing scaling factors R such that diag(R)*A*op2(C) is row equilibrated and computing the standard infinity-norm condition number

SYNOPSIS¶

REAL FUNCTION

SLA_GBRCOND( TRANS, N, KL, KU, AB, LDAB, AFB, LDAFB, IPIV, CMODE, C, INFO, WORK, IWORK )

IMPLICIT NONE CHARACTER TRANS INTEGER N, LDAB, LDAFB, INFO, KL, KU, CMODE INTEGER IWORK( * ), IPIV( * ) REAL AB( LDAB, * ), AFB( LDAFB, * ), WORK( * ), C( * )

PURPOSE¶

SLA_GERCOND Estimates the Skeel condition number of op(A) * op2(C)
where op2 is determined by CMODE as follows
CMODE = 1 op2(C) = C
CMODE = 0 op2(C) = I
CMODE = -1 op2(C) = inv(C)
The Skeel condition number cond(A) = norminf( |inv(A)||A| )
is computed by computing scaling factors R such that
diag(R)*A*op2(C) is row equilibrated and computing the standard
infinity-norm condition number.

ARGUMENTS¶

WORK real workspace of size 5*N.

IWORK integer workspace of size N.