public interface ggbak
GGBAK forms the right or left eigenvectors of a complex generalized
eigenvalue problem Ax = lambdaB*x, by backward transformation on
the computed eigenvectors of the balanced pair of matrices output by
CGGBAL.
Subroutines
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
job |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
side |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ilo |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ihi |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
lscale(*) |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
rscale(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
m |
|
|
complex(kind=sp),
|
intent(inout) |
|
|
:: |
v(ldv,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldv |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
job |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
side |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ilo |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ihi |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
lscale(*) |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
rscale(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
m |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
v(ldv,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldv |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
job |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
side |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ilo |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ihi |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
lscale(*) |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
rscale(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
m |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
v(ldv,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldv |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
job |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
side |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ilo |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ihi |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
lscale(*) |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
rscale(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
m |
|
|
complex(kind=dp),
|
intent(inout) |
|
|
:: |
v(ldv,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldv |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Module Procedures