INTEGER ZDRGVX |
( |
INTEGER |
NSIZE, |
|
|
DOUBLE PRECISION |
THRESH, |
|
|
INTEGER |
NIN, |
|
|
INTEGER |
NOUT, |
|
|
COMPLEX*16,dimension( lda, * ) |
A, |
|
|
INTEGER |
LDA, |
|
|
COMPLEX*16,dimension( lda, * ) |
B, |
|
|
COMPLEX*16,dimension( lda, * ) |
AI, |
|
|
COMPLEX*16,dimension( lda, * ) |
BI, |
|
|
COMPLEX*16,dimension( * ) |
ALPHA, |
|
|
COMPLEX*16,dimension( * ) |
BETA, |
|
|
COMPLEX*16,dimension( lda, * ) |
VL, |
|
|
COMPLEX*16,dimension( lda, * ) |
VR, |
|
|
INTEGER |
ILO, |
|
|
INTEGER |
IHI, |
|
|
DOUBLE PRECISION,dimension( * ) |
LSCALE, |
|
|
DOUBLE PRECISION,dimension( * ) |
RSCALE, |
|
|
DOUBLE PRECISION,dimension( * ) |
S, |
|
|
DOUBLE PRECISION,dimension( * ) |
DTRU, |
|
|
DOUBLE PRECISION,dimension( * ) |
DIF, |
|
|
DOUBLE PRECISION,dimension( * ) |
DIFTRU, |
|
|
COMPLEX*16,dimension( * ) |
WORK, |
|
|
INTEGER |
LWORK, |
|
|
DOUBLE PRECISION,dimension( * ) |
RWORK, |
|
|
INTEGER,dimension( * ) |
IWORK, |
|
|
INTEGER |
LIWORK, |
|
|
DOUBLE PRECISION,dimension( 4 ) |
RESULT, |
|
|
LOGICAL,dimension( * ) |
BWORK, |
|
|
INTEGER |
INFO |
|
) |
| |