fortran-lapack
|
LAED8: merges the two sets of eigenvalues together into a single sorted set. Then it tries to deflate the size of the problem. There are two ways in which deflation can occur: when two or more eigenvalues are close together or if there is a tiny element in the Z vector. For each such occurrence the order of the related secular equation problem is reduced by one. More...
Public Member Functions | |
pure subroutine | claed8 (k, n, qsiz, q, ldq, d, rho, cutpnt, z, dlamda, q2, ldq2, w, indxp, indx, indxq, perm, givptr, givcol, givnum, info) |
la_claed8 | |
pure subroutine | dlaed8 (icompq, k, n, qsiz, d, q, ldq, indxq, rho, cutpnt, z, dlamda, q2, ldq2, w, perm, givptr, givcol, givnum, indxp, indx, info) |
la_dlaed8 | |
la_qlaed8 | |
pure subroutine | slaed8 (icompq, k, n, qsiz, d, q, ldq, indxq, rho, cutpnt, z, dlamda, q2, ldq2, w, perm, givptr, givcol, givnum, indxp, indx, info) |
la_slaed8 | |
la_wlaed8 | |
pure subroutine | zlaed8 (k, n, qsiz, q, ldq, d, rho, cutpnt, z, dlamda, q2, ldq2, w, indxp, indx, indxq, perm, givptr, givcol, givnum, info) |
la_zlaed8 | |
LAED8: merges the two sets of eigenvalues together into a single sorted set. Then it tries to deflate the size of the problem. There are two ways in which deflation can occur: when two or more eigenvalues are close together or if there is a tiny element in the Z vector. For each such occurrence the order of the related secular equation problem is reduced by one.
pure subroutine la_lapack::laed8::claed8 | ( | integer(ilp), intent(out) | k, |
integer(ilp), intent(in) | n, | ||
integer(ilp), intent(in) | qsiz, | ||
complex(sp), dimension(ldq,*), intent(inout) | q, | ||
integer(ilp), intent(in) | ldq, | ||
real(sp), dimension(*), intent(inout) | d, | ||
real(sp), intent(inout) | rho, | ||
integer(ilp), intent(in) | cutpnt, | ||
real(sp), dimension(*), intent(inout) | z, | ||
real(sp), dimension(*), intent(out) | dlamda, | ||
complex(sp), dimension(ldq2,*), intent(out) | q2, | ||
integer(ilp), intent(in) | ldq2, | ||
real(sp), dimension(*), intent(out) | w, | ||
integer(ilp), dimension(*), intent(out) | indxp, | ||
integer(ilp), dimension(*), intent(out) | indx, | ||
integer(ilp), dimension(*), intent(inout) | indxq, | ||
integer(ilp), dimension( *), intent(out) | perm, | ||
integer(ilp), intent(out) | givptr, | ||
integer(ilp), dimension(2,*), intent(out) | givcol, | ||
real(sp), dimension(2,*), intent(out) | givnum, | ||
integer(ilp), intent(out) | info | ||
) |
pure subroutine la_lapack::laed8::dlaed8 | ( | integer(ilp), intent(in) | icompq, |
integer(ilp), intent(out) | k, | ||
integer(ilp), intent(in) | n, | ||
integer(ilp), intent(in) | qsiz, | ||
real(dp), dimension(*), intent(inout) | d, | ||
real(dp), dimension(ldq,*), intent(inout) | q, | ||
integer(ilp), intent(in) | ldq, | ||
integer(ilp), dimension(*), intent(inout) | indxq, | ||
real(dp), intent(inout) | rho, | ||
integer(ilp), intent(in) | cutpnt, | ||
real(dp), dimension(*), intent(inout) | z, | ||
real(dp), dimension(*), intent(out) | dlamda, | ||
real(dp), dimension(ldq2,*), intent(out) | q2, | ||
integer(ilp), intent(in) | ldq2, | ||
real(dp), dimension(*), intent(out) | w, | ||
integer(ilp), dimension( *), intent(out) | perm, | ||
integer(ilp), intent(out) | givptr, | ||
integer(ilp), dimension(2,*), intent(out) | givcol, | ||
real(dp), dimension(2,*), intent(out) | givnum, | ||
integer(ilp), dimension(*), intent(out) | indxp, | ||
integer(ilp), dimension(*), intent(out) | indx, | ||
integer(ilp), intent(out) | info | ||
) |
la_lapack::laed8::la_claed8 |
la_lapack::laed8::la_dlaed8 |
la_lapack::laed8::la_qlaed8 |
la_lapack::laed8::la_slaed8 |
la_lapack::laed8::la_wlaed8 |
la_lapack::laed8::la_zlaed8 |
pure subroutine la_lapack::laed8::slaed8 | ( | integer(ilp), intent(in) | icompq, |
integer(ilp), intent(out) | k, | ||
integer(ilp), intent(in) | n, | ||
integer(ilp), intent(in) | qsiz, | ||
real(sp), dimension(*), intent(inout) | d, | ||
real(sp), dimension(ldq,*), intent(inout) | q, | ||
integer(ilp), intent(in) | ldq, | ||
integer(ilp), dimension(*), intent(inout) | indxq, | ||
real(sp), intent(inout) | rho, | ||
integer(ilp), intent(in) | cutpnt, | ||
real(sp), dimension(*), intent(inout) | z, | ||
real(sp), dimension(*), intent(out) | dlamda, | ||
real(sp), dimension(ldq2,*), intent(out) | q2, | ||
integer(ilp), intent(in) | ldq2, | ||
real(sp), dimension(*), intent(out) | w, | ||
integer(ilp), dimension( *), intent(out) | perm, | ||
integer(ilp), intent(out) | givptr, | ||
integer(ilp), dimension(2,*), intent(out) | givcol, | ||
real(sp), dimension(2,*), intent(out) | givnum, | ||
integer(ilp), dimension(*), intent(out) | indxp, | ||
integer(ilp), dimension(*), intent(out) | indx, | ||
integer(ilp), intent(out) | info | ||
) |
pure subroutine la_lapack::laed8::zlaed8 | ( | integer(ilp), intent(out) | k, |
integer(ilp), intent(in) | n, | ||
integer(ilp), intent(in) | qsiz, | ||
complex(dp), dimension(ldq,*), intent(inout) | q, | ||
integer(ilp), intent(in) | ldq, | ||
real(dp), dimension(*), intent(inout) | d, | ||
real(dp), intent(inout) | rho, | ||
integer(ilp), intent(in) | cutpnt, | ||
real(dp), dimension(*), intent(inout) | z, | ||
real(dp), dimension(*), intent(out) | dlamda, | ||
complex(dp), dimension(ldq2,*), intent(out) | q2, | ||
integer(ilp), intent(in) | ldq2, | ||
real(dp), dimension(*), intent(out) | w, | ||
integer(ilp), dimension(*), intent(out) | indxp, | ||
integer(ilp), dimension(*), intent(out) | indx, | ||
integer(ilp), dimension(*), intent(inout) | indxq, | ||
integer(ilp), dimension( *), intent(out) | perm, | ||
integer(ilp), intent(out) | givptr, | ||
integer(ilp), dimension(2,*), intent(out) | givcol, | ||
real(dp), dimension(2,*), intent(out) | givnum, | ||
integer(ilp), intent(out) | info | ||
) |