f77_heevx Interface

public interface f77_heevx

Generic old style interface for HEEVX. Supports c, z. See also: mfi_heevx, cheevx, zheevx.


Subroutines

public pure subroutine cheevx(jobz, range, uplo, n, a, lda, vl, vu, il, iu, abstol, m, w, z, ldz, work, lwork, rwork, lrwork, iwork, liwork, ifail, info)

Original interface for CHEEVX See also: mfi_heevx, f77_heevx.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: jobz
character(len=1), intent(in) :: range
character(len=1), intent(in) :: uplo
integer, intent(in) :: n
complex(kind=REAL32), intent(inout) :: a(lda,*)
integer, intent(in) :: lda
real(kind=REAL32), intent(in) :: vl
real(kind=REAL32), intent(in) :: vu
integer, intent(in) :: il
integer, intent(in) :: iu
real(kind=REAL32), intent(in) :: abstol
integer, intent(in) :: m
real(kind=REAL32), intent(out) :: w(*)
complex(kind=REAL32), intent(inout) :: z(ldz,*)
integer, intent(in) :: ldz
complex(kind=REAL32), intent(inout) :: work(*)
integer, intent(in) :: lwork
real(kind=REAL32), intent(inout) :: rwork(*)
integer, intent(in) :: lrwork
integer, intent(inout) :: iwork(*)
integer, intent(in) :: liwork
integer, intent(in) :: ifail
integer, intent(out) :: info

public pure subroutine zheevx(jobz, range, uplo, n, a, lda, vl, vu, il, iu, abstol, m, w, z, ldz, work, lwork, rwork, lrwork, iwork, liwork, ifail, info)

Original interface for ZHEEVX See also: mfi_heevx, f77_heevx.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: jobz
character(len=1), intent(in) :: range
character(len=1), intent(in) :: uplo
integer, intent(in) :: n
complex(kind=REAL64), intent(inout) :: a(lda,*)
integer, intent(in) :: lda
real(kind=REAL64), intent(in) :: vl
real(kind=REAL64), intent(in) :: vu
integer, intent(in) :: il
integer, intent(in) :: iu
real(kind=REAL64), intent(in) :: abstol
integer, intent(in) :: m
real(kind=REAL64), intent(out) :: w(*)
complex(kind=REAL64), intent(inout) :: z(ldz,*)
integer, intent(in) :: ldz
complex(kind=REAL64), intent(inout) :: work(*)
integer, intent(in) :: lwork
real(kind=REAL64), intent(inout) :: rwork(*)
integer, intent(in) :: lrwork
integer, intent(inout) :: iwork(*)
integer, intent(in) :: liwork
integer, intent(in) :: ifail
integer, intent(out) :: info