public interface gbbrd
GBBRD reduces a complex general m-by-n band matrix A to real upper
bidiagonal form B by a unitary transformation: QH * A * P = B.
The routine computes B, and optionally forms Q or PH, or computes
Q*HC for a given matrix C.
Subroutines
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
vect |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
m |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ncc |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
kl |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ku |
|
|
complex(kind=sp),
|
intent(inout) |
|
|
:: |
ab(ldab,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldab |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
d(*) |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
e(*) |
|
|
complex(kind=sp),
|
intent(out) |
|
|
:: |
q(ldq,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldq |
|
|
complex(kind=sp),
|
intent(out) |
|
|
:: |
pt(ldpt,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldpt |
|
|
complex(kind=sp),
|
intent(inout) |
|
|
:: |
c(ldc,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldc |
|
|
complex(kind=sp),
|
intent(out) |
|
|
:: |
work(*) |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
rwork(*) |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
vect |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
m |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ncc |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
kl |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ku |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
ab(ldab,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldab |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
d(*) |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
e(*) |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
q(ldq,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldq |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
pt(ldpt,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldpt |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
c(ldc,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldc |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
work(*) |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
vect |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
m |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ncc |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
kl |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ku |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
ab(ldab,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldab |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
d(*) |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
e(*) |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
q(ldq,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldq |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
pt(ldpt,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldpt |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
c(ldc,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldc |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
work(*) |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
vect |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
m |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ncc |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
kl |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ku |
|
|
complex(kind=dp),
|
intent(inout) |
|
|
:: |
ab(ldab,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldab |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
d(*) |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
e(*) |
|
|
complex(kind=dp),
|
intent(out) |
|
|
:: |
q(ldq,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldq |
|
|
complex(kind=dp),
|
intent(out) |
|
|
:: |
pt(ldpt,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldpt |
|
|
complex(kind=dp),
|
intent(inout) |
|
|
:: |
c(ldc,*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
ldc |
|
|
complex(kind=dp),
|
intent(out) |
|
|
:: |
work(*) |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
rwork(*) |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Module Procedures