zgebak - form the right or left eigenvectors of a complex general matrix by backward transformation on the computed eigenvectors of the balanced matrix output by ZGEBAL
SUBROUTINE ZGEBAK(JOB, SIDE, N, ILO, IHI, SCALE, M, V, LDV, INFO) CHARACTER*1 JOB, SIDE DOUBLE COMPLEX V(LDV,*) INTEGER N, ILO, IHI, M, LDV, INFO DOUBLE PRECISION SCALE(*) SUBROUTINE ZGEBAK_64(JOB, SIDE, N, ILO, IHI, SCALE, M, V, LDV, INFO) CHARACTER*1 JOB, SIDE DOUBLE COMPLEX V(LDV,*) INTEGER*8 N, ILO, IHI, M, LDV, INFO DOUBLE PRECISION SCALE(*) F95 INTERFACE SUBROUTINE GEBAK(JOB, SIDE, N, ILO, IHI, SCALE, M, V, LDV, INFO) CHARACTER(LEN=1) :: JOB, SIDE COMPLEX(8), DIMENSION(:,:) :: V INTEGER :: N, ILO, IHI, M, LDV, INFO REAL(8), DIMENSION(:) :: SCALE SUBROUTINE GEBAK_64(JOB, SIDE, N, ILO, IHI, SCALE, M, V, LDV, INFO) CHARACTER(LEN=1) :: JOB, SIDE COMPLEX(8), DIMENSION(:,:) :: V INTEGER(8) :: N, ILO, IHI, M, LDV, INFO REAL(8), DIMENSION(:) :: SCALE C INTERFACE #include <sunperf.h> void zgebak(char job, char side, int n, int ilo, int ihi, double *scale, int m, doublecomplex *v, int ldv, int *info); void zgebak_64(char job, char side, long n, long ilo, long ihi, double *scale, long m, doublecomplex *v, long ldv, long *info);
Oracle Solaris Studio Performance Library zgebak(3P) NAME zgebak - form the right or left eigenvectors of a complex general matrix by backward transformation on the computed eigenvectors of the balanced matrix output by ZGEBAL SYNOPSIS SUBROUTINE ZGEBAK(JOB, SIDE, N, ILO, IHI, SCALE, M, V, LDV, INFO) CHARACTER*1 JOB, SIDE DOUBLE COMPLEX V(LDV,*) INTEGER N, ILO, IHI, M, LDV, INFO DOUBLE PRECISION SCALE(*) SUBROUTINE ZGEBAK_64(JOB, SIDE, N, ILO, IHI, SCALE, M, V, LDV, INFO) CHARACTER*1 JOB, SIDE DOUBLE COMPLEX V(LDV,*) INTEGER*8 N, ILO, IHI, M, LDV, INFO DOUBLE PRECISION SCALE(*) F95 INTERFACE SUBROUTINE GEBAK(JOB, SIDE, N, ILO, IHI, SCALE, M, V, LDV, INFO) CHARACTER(LEN=1) :: JOB, SIDE COMPLEX(8), DIMENSION(:,:) :: V INTEGER :: N, ILO, IHI, M, LDV, INFO REAL(8), DIMENSION(:) :: SCALE SUBROUTINE GEBAK_64(JOB, SIDE, N, ILO, IHI, SCALE, M, V, LDV, INFO) CHARACTER(LEN=1) :: JOB, SIDE COMPLEX(8), DIMENSION(:,:) :: V INTEGER(8) :: N, ILO, IHI, M, LDV, INFO REAL(8), DIMENSION(:) :: SCALE C INTERFACE #include <sunperf.h> void zgebak(char job, char side, int n, int ilo, int ihi, double *scale, int m, doublecomplex *v, int ldv, int *info); void zgebak_64(char job, char side, long n, long ilo, long ihi, double *scale, long m, doublecomplex *v, long ldv, long *info); PURPOSE zgebak forms the right or left eigenvectors of a complex general matrix by backward transformation on the computed eigenvectors of the balanced matrix output by ZGEBAL. ARGUMENTS JOB (input) Specifies the type of backward transformation required: = 'N', do nothing, return immediately; = 'P', do backward transformation for permutation only; = 'S', do backward transformation for scaling only; = 'B', do backward transfor- mations for both permutation and scaling. JOB must be the same as the argument JOB supplied to ZGEBAL. SIDE (input) = 'R': V contains right eigenvectors; = 'L': V contains left eigenvectors. N (input) The number of rows of the matrix V. N >= 0. ILO (input) The integer ILO determined by ZGEBAL. 1 <= ILO <= IHI <= N, if N > 0; ILO=1 and IHI=0, if N=0. IHI (input) The integer IHI determined by ZGEBAL. 1 <= ILO <= IHI <= N, if N > 0; ILO=1 and IHI=0, if N=0. SCALE (input) Details of the permutation and scaling factors, as returned by ZGEBAL. M (input) The number of columns of the matrix V. M >= 0. V (input/output) On entry, the matrix of right or left eigenvectors to be transformed, as returned by CHSEIN or CTREVC. On exit, V is overwritten by the transformed eigenvectors. LDV (input) The leading dimension of the array V. LDV >= max(1,N). INFO (output) = 0: successful exit < 0: if INFO = -i, the i-th argument had an illegal value. 7 Nov 2015 zgebak(3P)