public interface laqz4
LAQZ4 Executes a single multishift QZ sweep
Subroutines
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
logical(kind=lk),
|
intent(in) |
|
|
:: |
ilschur |
|
|
logical(kind=lk),
|
intent(in) |
|
|
:: |
ilq |
|
|
logical(kind=lk),
|
intent(in) |
|
|
:: |
ilz |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ilo |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ihi |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
nshifts |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
nblock_desired |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
sr(*) |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
si(*) |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
ss(*) |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
a(lda,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
lda |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
b(ldb,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldb |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
q(ldq,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldq |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
z(ldz,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldz |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
qc(ldqc,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldqc |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
zc(ldzc,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldzc |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
work(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
lwork |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
logical(kind=lk),
|
intent(in) |
|
|
:: |
ilschur |
|
|
logical(kind=lk),
|
intent(in) |
|
|
:: |
ilq |
|
|
logical(kind=lk),
|
intent(in) |
|
|
:: |
ilz |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ilo |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ihi |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
nshifts |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
nblock_desired |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
sr(*) |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
si(*) |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
ss(*) |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
a(lda,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
lda |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
b(ldb,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldb |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
q(ldq,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldq |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
z(ldz,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldz |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
qc(ldqc,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldqc |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
zc(ldzc,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldzc |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
work(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
lwork |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Module Procedures
