public interface larrc
Find the number of eigenvalues of the symmetric tridiagonal matrix T
that are in the interval (VL,VU] if JOBT = 'T', and of L D L^T
if JOBT = 'L'.
Subroutines
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
jobt |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
vl |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
vu |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
d(*) |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
e(*) |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
pivmin |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
eigcnt |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
lcnt |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
rcnt |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
character(len=1),
|
intent(in) |
|
|
:: |
jobt |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
vl |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
vu |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
d(*) |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
e(*) |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
pivmin |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
eigcnt |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
lcnt |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
rcnt |
|
|
integer(kind=ilp),
|
intent(out) |
|
|
:: |
info |
|
Module Procedures
