SYNOPSIS

DOUBLE PRECISION

FUNCTION ZLA_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*16 A( LDA, * ), AF( LDAF, * ), WORK( * ), X( * )

    

DOUBLE PRECISION RWORK( * )

PURPOSE

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

ARGUMENTS

C COMPLEX*16 vector.

WORK COMPLEX*16 workspace of size 2*N.

RWORK DOUBLE PRECISION workspace of size 3*N.