is_symmetric Interface

experimental
10 statements
Source File

public interface is_symmetric

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

Contents

Module Procedures

is_symmetric_rsp is_symmetric_rdp is_symmetric_csp is_symmetric_cdp is_symmetric_iint8 is_symmetric_iint16 is_symmetric_iint32 is_symmetric_iint64

Module Procedures

private pure function is_symmetric_rsp(A) result(res)

Arguments

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

Return Value logical

private pure function is_symmetric_rdp(A) result(res)

Arguments

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

Return Value logical

private pure function is_symmetric_csp(A) result(res)

Arguments

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

Return Value logical

private pure function is_symmetric_cdp(A) result(res)

Arguments

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

Return Value logical

private pure function is_symmetric_iint8(A) result(res)

Arguments

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

Return Value logical

private pure function is_symmetric_iint16(A) result(res)

Arguments

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

Return Value logical

private pure function is_symmetric_iint32(A) result(res)

Arguments

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

Return Value logical

private pure function is_symmetric_iint64(A) result(res)

Arguments

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

Return Value logical