MapMatrix_psr Subroutine

public subroutine MapMatrix_psr(inmat, outmat, proc)

Given a distributed matrix, apply this procedure to each element (real).

Arguments

Type IntentOptional AttributesName
type(Matrix_ps), intent(in) :: inmat

The matrix to apply the procedure to.

type(Matrix_ps), intent(inout) :: outmat

The matrix where each element has had proc called on it.

public function proc(row, column, val) result(valid)

The procedure to apply to each element.

Arguments
Type IntentOptional AttributesName
integer, intent(inout) :: row

The row value of an element.

integer, intent(inout) :: column

The column value of an element.

real(kind=NTREAL), intent(inout) :: val

The actual value of an element.

Return Value logical

Set this to false to filter an element.


Contents

None