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 | 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