public interface is_square
Checks if a matrix (rank-2 array) is square
(Specification)
Module Procedures
private pure function is_square_rsp(A) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
real(kind=sp), |
intent(in) |
| | :: |
A(:,:) | |
Return Value logical
private pure function is_square_rdp(A) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
real(kind=dp), |
intent(in) |
| | :: |
A(:,:) | |
Return Value logical
private pure function is_square_csp(A) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
complex(kind=sp), |
intent(in) |
| | :: |
A(:,:) | |
Return Value logical
private pure function is_square_cdp(A) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
complex(kind=dp), |
intent(in) |
| | :: |
A(:,:) | |
Return Value logical
private pure function is_square_iint8(A) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
integer(kind=int8), |
intent(in) |
| | :: |
A(:,:) | |
Return Value logical
private pure function is_square_iint16(A) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
integer(kind=int16), |
intent(in) |
| | :: |
A(:,:) | |
Return Value logical
private pure function is_square_iint32(A) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
integer(kind=int32), |
intent(in) |
| | :: |
A(:,:) | |
Return Value logical
private pure function is_square_iint64(A) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
integer(kind=int64), |
intent(in) |
| | :: |
A(:,:) | |
Return Value logical