NAME

CLA_GERCOND_X - CLA_GERCOND_X compute the infinity norm condition number of op(A) * diag(X) where X is a COMPLEX vector

SYNOPSIS

REAL FUNCTION

CLA_GERCOND_X( TRANS, N, A, LDA, AF, LDAF, IPIV, X, INFO, WORK, RWORK )

IMPLICIT NONE CHARACTER TRANS INTEGER N, LDA, LDAF, INFO INTEGER IPIV( * ) COMPLEX A( LDA, * ), AF( LDAF, * ), WORK( * ), X( * ) REAL RWORK( * )

PURPOSE

CLA_GERCOND_X computes the infinity norm condition number of
op(A) * diag(X) where X is a COMPLEX vector.

ARGUMENTS

X COMPLEX vector.

WORK COMPLEX workspace of size 2*N.

RWORK REAL workspace of size 3*N.