Given the initial representation L D L^T and its cluster of close eigenvalues (in a relative measure), W( CLSTRT ), W( CLSTRT+1 ), ... W( CLEND ), LARRF: finds a new relatively robust representation L D L^T - SIGMA I = L(+) D(+) L(+)^T such that at least one of the eigenvalues of L(+) D(+) L(+)^T is relatively isolated.
More...
|
pure subroutine | dlarrf (n, d, l, ld, clstrt, clend, w, wgap, werr, spdiam, clgapl, clgapr, pivmin, sigma, dplus, lplus, work, info) |
|
| la_dlarrf |
|
| la_qlarrf |
|
pure subroutine | slarrf (n, d, l, ld, clstrt, clend, w, wgap, werr, spdiam, clgapl, clgapr, pivmin, sigma, dplus, lplus, work, info) |
|
| la_slarrf |
|
Given the initial representation L D L^T and its cluster of close eigenvalues (in a relative measure), W( CLSTRT ), W( CLSTRT+1 ), ... W( CLEND ), LARRF: finds a new relatively robust representation L D L^T - SIGMA I = L(+) D(+) L(+)^T such that at least one of the eigenvalues of L(+) D(+) L(+)^T is relatively isolated.
◆ dlarrf()
pure subroutine la_lapack::larrf::dlarrf |
( |
integer(ilp), intent(in) | n, |
|
|
real(dp), dimension(*), intent(in) | d, |
|
|
real(dp), dimension(*), intent(in) | l, |
|
|
real(dp), dimension(*), intent(in) | ld, |
|
|
integer(ilp), intent(in) | clstrt, |
|
|
integer(ilp), intent(in) | clend, |
|
|
real(dp), dimension(*), intent(in) | w, |
|
|
real(dp), dimension(*), intent(inout) | wgap, |
|
|
real(dp), dimension( *), intent(in) | werr, |
|
|
real(dp), intent(in) | spdiam, |
|
|
real(dp), intent(in) | clgapl, |
|
|
real(dp), intent(in) | clgapr, |
|
|
real(dp), intent(in) | pivmin, |
|
|
real(dp), intent(out) | sigma, |
|
|
real(dp), dimension(*), intent(out) | dplus, |
|
|
real(dp), dimension(*), intent(out) | lplus, |
|
|
real(dp), dimension(*), intent(out) | work, |
|
|
integer(ilp), intent(out) | info ) |
◆ la_dlarrf()
la_lapack::larrf::la_dlarrf |
◆ la_qlarrf()
la_lapack::larrf::la_qlarrf |
◆ la_slarrf()
la_lapack::larrf::la_slarrf |
◆ slarrf()
pure subroutine la_lapack::larrf::slarrf |
( |
integer(ilp), intent(in) | n, |
|
|
real(sp), dimension(*), intent(in) | d, |
|
|
real(sp), dimension(*), intent(in) | l, |
|
|
real(sp), dimension(*), intent(in) | ld, |
|
|
integer(ilp), intent(in) | clstrt, |
|
|
integer(ilp), intent(in) | clend, |
|
|
real(sp), dimension(*), intent(in) | w, |
|
|
real(sp), dimension(*), intent(inout) | wgap, |
|
|
real(sp), dimension( *), intent(in) | werr, |
|
|
real(sp), intent(in) | spdiam, |
|
|
real(sp), intent(in) | clgapl, |
|
|
real(sp), intent(in) | clgapr, |
|
|
real(sp), intent(in) | pivmin, |
|
|
real(sp), intent(out) | sigma, |
|
|
real(sp), dimension(*), intent(out) | dplus, |
|
|
real(sp), dimension(*), intent(out) | lplus, |
|
|
real(sp), dimension(*), intent(out) | work, |
|
|
integer(ilp), intent(out) | info ) |
The documentation for this interface was generated from the following file: