public interface laed5
This subroutine computes the I-th eigenvalue of a symmetric rank-one
modification of a 2-by-2 diagonal matrix
diag( D ) + RHO * Z * transpose(Z) .
The diagonal elements in the array D are assumed to satisfy
D(i) < D(j) for i < j .
We also assume RHO > 0 and that the Euclidean norm of the vector
Z is one.
Subroutines
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
i |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
d(2) |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
z(2) |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
delta(2) |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
rho |
|
|
real(kind=dp),
|
intent(out) |
|
|
:: |
dlam |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
i |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
d(2) |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
z(2) |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
delta(2) |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
rho |
|
|
real(kind=sp),
|
intent(out) |
|
|
:: |
dlam |
|
Module Procedures