public interface lahqr
LAHQR is an auxiliary routine called by CHSEQR to update the
eigenvalues and Schur decomposition already computed by CHSEQR, by
dealing with the Hessenberg submatrix in rows and columns ILO to
IHI.
Subroutines
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
logical(kind=lk),
|
intent(in) |
|
|
:: |
wantt |
|
|
logical(kind=lk),
|
intent(in) |
|
|
:: |
wantz |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ilo |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ihi |
|
|
complex(kind=sp),
|
intent(inout) |
|
|
:: |
h(ldh,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldh |
|
|
complex(kind=sp),
|
intent(out) |
|
|
:: |
w(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
iloz |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ihiz |
|
|
complex(kind=sp),
|
intent(inout) |
|
|
:: |
z(ldz,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldz |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
logical(kind=lk),
|
intent(in) |
|
|
:: |
wantt |
|
|
logical(kind=lk),
|
intent(in) |
|
|
:: |
wantz |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ilo |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ihi |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
h(ldh,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldh |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
wr(*) |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
wi(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
iloz |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ihiz |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
z(ldz,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldz |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
logical(kind=lk),
|
intent(in) |
|
|
:: |
wantt |
|
|
logical(kind=lk),
|
intent(in) |
|
|
:: |
wantz |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ilo |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ihi |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
h(ldh,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldh |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
wr(*) |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
wi(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
iloz |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ihiz |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
z(ldz,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldz |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
logical(kind=lk),
|
intent(in) |
|
|
:: |
wantt |
|
|
logical(kind=lk),
|
intent(in) |
|
|
:: |
wantz |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ilo |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ihi |
|
|
complex(kind=dp),
|
intent(inout) |
|
|
:: |
h(ldh,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldh |
|
|
complex(kind=dp),
|
intent(out) |
|
|
:: |
w(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
iloz |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ihiz |
|
|
complex(kind=dp),
|
intent(inout) |
|
|
:: |
z(ldz,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldz |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Module Procedures