extract_lower_triangular Interface

public interface extract_lower_triangular

An interface to the lower triangular matrix extraction routines.


Module Procedures

private pure function extract_lower_triangular_dbl(x) result(rst)

Extracts the lower triangular portion of a matrix.

Arguments

Type IntentOptional Attributes Name
real(kind=real64), intent(in), dimension(:,:) :: x

The M-by-N matrix.

Return Value real(kind=real64), allocatable, dimension(:,:)

The M-by-K lower triangular matrix where K = MIN(M, N).

private pure function extract_lower_triangular_cmplx(x) result(rst)

Extracts the lower triangular portion of a matrix.

Arguments

Type IntentOptional Attributes Name
complex(kind=real64), intent(in), dimension(:,:) :: x

The M-by-N matrix.

Return Value complex(kind=real64), allocatable, dimension(:,:)

The M-by-K lower triangular matrix where K = MIN(M, N).