get_element Function

private pure function get_element(this, row, col) result(element)

Retrieves the element at position (row, col) of the original matrix. See the LAPACK documentation, element $a_{ij}$ of the original matrix is stored at position $(kd + 1 + i - j, j)$ if uplo = "U" and at position $(1 + i - j, j)$ if uplo = "L" in the banded storage.

Arguments

Type	Intent	Optional	Attributes		Name
class(hermitian_banded_matrix_t),	intent(in)			::	this	type instance
integer,	intent(in)			::	row	the row index of the original position
integer,	intent(in)			::	col	the column index of the original position

Return Value complex(kind=dp)

the element at the original position (row, col)

Contents

None