hptrd Interface

public interface hptrd

HPTRD reduces a complex Hermitian matrix A stored in packed form to real symmetric tridiagonal form T by a unitary similarity transformation: Q**H * A * Q = T.


Subroutines

public pure subroutine chptrd(uplo, n, ap, d, e, tau, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
complex(kind=sp), intent(inout) :: ap(*)
real(kind=sp), intent(out) :: d(*)
real(kind=sp), intent(out) :: e(*)
complex(kind=sp), intent(out) :: tau(*)
integer(kind=ilp), intent(out) :: info

public pure subroutine zhptrd(uplo, n, ap, d, e, tau, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
complex(kind=dp), intent(inout) :: ap(*)
real(kind=dp), intent(out) :: d(*)
real(kind=dp), intent(out) :: e(*)
complex(kind=dp), intent(out) :: tau(*)
integer(kind=ilp), intent(out) :: info

Module Procedures

public interface stdlib_chptrd()

Arguments

None

public interface stdlib_zhptrd()

Arguments

None