is_symmetric Interface

public interface is_symmetric

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


Module Procedures

private pure function is_symmetric_rsp(A) result(res)

Arguments

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

Return Value logical

private pure function is_symmetric_rdp(A) result(res)

Arguments

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

Return Value logical

private pure function is_symmetric_csp(A) result(res)

Arguments

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

Return Value logical

private pure function is_symmetric_cdp(A) result(res)

Arguments

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

Return Value logical

private pure function is_symmetric_iint8(A) result(res)

Arguments

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

Return Value logical

private pure function is_symmetric_iint16(A) result(res)

Arguments

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

Return Value logical

private pure function is_symmetric_iint32(A) result(res)

Arguments

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

Return Value logical

private pure function is_symmetric_iint64(A) result(res)

Arguments

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

Return Value logical