main Program

Uses

Variables

Type Attributes Name Initial
real(kind=real64), allocatable :: A(:,:)
real(kind=real64), allocatable :: V(:,:)
real(kind=real64), allocatable :: T(:,:)
real(kind=real64), allocatable :: D(:)
real(kind=real64), allocatable :: E(:)
real(kind=real64), allocatable :: WORK(:)
integer(kind=int32), allocatable :: IWORK(:)
integer(kind=int32), allocatable :: IFAIL(:)
real(kind=real64), allocatable :: Eigen_vectors(:,:)
real(kind=real64), allocatable :: eigen_values(:)
integer(kind=int32) :: num_eigen
integer(kind=int32) :: INFO
real(kind=real64) :: VL
real(kind=real64) :: VU
real(kind=real64) :: ABSTOL
integer(kind=int32) :: IL
integer(kind=int32) :: IU
character(len=1) :: JOBZ = "V"
character(len=1) :: RANGE = "A"

Functions

function getDiag(A) result(Diag_vec)

Arguments

Type IntentOptional Attributes Name
real(kind=real64), intent(in) :: A(:,:)

Return Value real(kind=real64), allocatable, (:)

function getSubDiag(A) result(subDiag_vec)

Arguments

Type IntentOptional Attributes Name
real(kind=real64), intent(in) :: A(:,:)

Return Value real(kind=real64), allocatable, (:)