is_hessenberg Interface

experimental
10 statements
Source File

public interface is_hessenberg

Checks if a matrix (rank-2 array) is Hessenberg (Specification)

Module Procedures

private function is_hessenberg_rsp(A, uplo) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(in)			::	A(:,:)
character(len=1),	intent(in)			::	uplo

Return Value logical

private function is_hessenberg_rdp(A, uplo) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	A(:,:)
character(len=1),	intent(in)			::	uplo

Return Value logical

private function is_hessenberg_csp(A, uplo) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(in)			::	A(:,:)
character(len=1),	intent(in)			::	uplo

Return Value logical

private function is_hessenberg_cdp(A, uplo) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(in)			::	A(:,:)
character(len=1),	intent(in)			::	uplo

Return Value logical

private function is_hessenberg_iint8(A, uplo) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int8),	intent(in)			::	A(:,:)
character(len=1),	intent(in)			::	uplo

Return Value logical

private function is_hessenberg_iint16(A, uplo) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int16),	intent(in)			::	A(:,:)
character(len=1),	intent(in)			::	uplo

Return Value logical

private function is_hessenberg_iint32(A, uplo) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	A(:,:)
character(len=1),	intent(in)			::	uplo

Return Value logical

private function is_hessenberg_iint64(A, uplo) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	A(:,:)
character(len=1),	intent(in)			::	uplo

Return Value logical