f77_heevr Interface

public interface f77_heevr

Generic old style interface for HEEVR. Supports c, z. See also: mfi_heevr, cheevr, zheevr.


Subroutines

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

Original interface for CHEEVR See also: mfi_heevr, f77_heevr.

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
integer, intent(in) :: isuppz(*)
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(out) :: info

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

Original interface for ZHEEVR See also: mfi_heevr, f77_heevr.

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
integer, intent(in) :: isuppz(*)
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(out) :: info