larrv Interface

public interface larrv

LARRV computes the eigenvectors of the tridiagonal matrix T = L D LT given L, D and APPROXIMATIONS to the eigenvalues of L D LT. The input eigenvalues should have been computed by SLARRE.


Subroutines

public pure subroutine clarrv(n, vl, vu, d, l, pivmin, isplit, m, dol, dou, minrgp, rtol1, rtol2, w, werr, wgap, iblock, indexw, gers, z, ldz, isuppz, work, iwork, info)

Arguments

Type IntentOptional Attributes Name
integer(kind=ilp), intent(in) :: n
real(kind=sp), intent(in) :: vl
real(kind=sp), intent(in) :: vu
real(kind=sp), intent(inout) :: d(*)
real(kind=sp), intent(inout) :: l(*)
real(kind=sp), intent(in) :: pivmin
integer(kind=ilp), intent(in) :: isplit(*)
integer(kind=ilp), intent(in) :: m
integer(kind=ilp), intent(in) :: dol
integer(kind=ilp), intent(in) :: dou
real(kind=sp), intent(in) :: minrgp
real(kind=sp), intent(inout) :: rtol1
real(kind=sp), intent(inout) :: rtol2
real(kind=sp), intent(inout) :: w(*)
real(kind=sp), intent(inout) :: werr(*)
real(kind=sp), intent(inout) :: wgap(*)
integer(kind=ilp), intent(in) :: iblock(*)
integer(kind=ilp), intent(in) :: indexw(*)
real(kind=sp), intent(in) :: gers(*)
complex(kind=sp), intent(out) :: z(ldz,*)
integer(kind=ilp), intent(in) :: ldz
integer(kind=ilp), intent(out) :: isuppz(*)
real(kind=sp), intent(out) :: work(*)
integer(kind=ilp), intent(out) :: iwork(*)
integer(kind=ilp), intent(out) :: info

public pure subroutine dlarrv(n, vl, vu, d, l, pivmin, isplit, m, dol, dou, minrgp, rtol1, rtol2, w, werr, wgap, iblock, indexw, gers, z, ldz, isuppz, work, iwork, info)

Arguments

Type IntentOptional Attributes Name
integer(kind=ilp), intent(in) :: n
real(kind=dp), intent(in) :: vl
real(kind=dp), intent(in) :: vu
real(kind=dp), intent(inout) :: d(*)
real(kind=dp), intent(inout) :: l(*)
real(kind=dp), intent(in) :: pivmin
integer(kind=ilp), intent(in) :: isplit(*)
integer(kind=ilp), intent(in) :: m
integer(kind=ilp), intent(in) :: dol
integer(kind=ilp), intent(in) :: dou
real(kind=dp), intent(in) :: minrgp
real(kind=dp), intent(inout) :: rtol1
real(kind=dp), intent(inout) :: rtol2
real(kind=dp), intent(inout) :: w(*)
real(kind=dp), intent(inout) :: werr(*)
real(kind=dp), intent(inout) :: wgap(*)
integer(kind=ilp), intent(in) :: iblock(*)
integer(kind=ilp), intent(in) :: indexw(*)
real(kind=dp), intent(in) :: gers(*)
real(kind=dp), intent(out) :: z(ldz,*)
integer(kind=ilp), intent(in) :: ldz
integer(kind=ilp), intent(out) :: isuppz(*)
real(kind=dp), intent(out) :: work(*)
integer(kind=ilp), intent(out) :: iwork(*)
integer(kind=ilp), intent(out) :: info

public pure subroutine slarrv(n, vl, vu, d, l, pivmin, isplit, m, dol, dou, minrgp, rtol1, rtol2, w, werr, wgap, iblock, indexw, gers, z, ldz, isuppz, work, iwork, info)

Arguments

Type IntentOptional Attributes Name
integer(kind=ilp), intent(in) :: n
real(kind=sp), intent(in) :: vl
real(kind=sp), intent(in) :: vu
real(kind=sp), intent(inout) :: d(*)
real(kind=sp), intent(inout) :: l(*)
real(kind=sp), intent(in) :: pivmin
integer(kind=ilp), intent(in) :: isplit(*)
integer(kind=ilp), intent(in) :: m
integer(kind=ilp), intent(in) :: dol
integer(kind=ilp), intent(in) :: dou
real(kind=sp), intent(in) :: minrgp
real(kind=sp), intent(inout) :: rtol1
real(kind=sp), intent(inout) :: rtol2
real(kind=sp), intent(inout) :: w(*)
real(kind=sp), intent(inout) :: werr(*)
real(kind=sp), intent(inout) :: wgap(*)
integer(kind=ilp), intent(in) :: iblock(*)
integer(kind=ilp), intent(in) :: indexw(*)
real(kind=sp), intent(in) :: gers(*)
real(kind=sp), intent(out) :: z(ldz,*)
integer(kind=ilp), intent(in) :: ldz
integer(kind=ilp), intent(out) :: isuppz(*)
real(kind=sp), intent(out) :: work(*)
integer(kind=ilp), intent(out) :: iwork(*)
integer(kind=ilp), intent(out) :: info

public pure subroutine zlarrv(n, vl, vu, d, l, pivmin, isplit, m, dol, dou, minrgp, rtol1, rtol2, w, werr, wgap, iblock, indexw, gers, z, ldz, isuppz, work, iwork, info)

Arguments

Type IntentOptional Attributes Name
integer(kind=ilp), intent(in) :: n
real(kind=dp), intent(in) :: vl
real(kind=dp), intent(in) :: vu
real(kind=dp), intent(inout) :: d(*)
real(kind=dp), intent(inout) :: l(*)
real(kind=dp), intent(in) :: pivmin
integer(kind=ilp), intent(in) :: isplit(*)
integer(kind=ilp), intent(in) :: m
integer(kind=ilp), intent(in) :: dol
integer(kind=ilp), intent(in) :: dou
real(kind=dp), intent(in) :: minrgp
real(kind=dp), intent(inout) :: rtol1
real(kind=dp), intent(inout) :: rtol2
real(kind=dp), intent(inout) :: w(*)
real(kind=dp), intent(inout) :: werr(*)
real(kind=dp), intent(inout) :: wgap(*)
integer(kind=ilp), intent(in) :: iblock(*)
integer(kind=ilp), intent(in) :: indexw(*)
real(kind=dp), intent(in) :: gers(*)
complex(kind=dp), intent(out) :: z(ldz,*)
integer(kind=ilp), intent(in) :: ldz
integer(kind=ilp), intent(out) :: isuppz(*)
real(kind=dp), intent(out) :: work(*)
integer(kind=ilp), intent(out) :: iwork(*)
integer(kind=ilp), intent(out) :: info

Module Procedures

public interface stdlib_clarrv()

Arguments

None

public interface stdlib_dlarrv()

Arguments

None

public interface stdlib_slarrv()

Arguments

None

public interface stdlib_zlarrv()

Arguments

None