unique_tuples Subroutine

public subroutine unique_tuples(ndim, nz, arr)

Removes duplicate entries from integer tuple arr

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: ndim

Dimension of tuple

integer, intent(inout) :: nz

Number of tuples, on return number of unique tuples

integer, intent(inout), dimension(ndim, nz) :: arr

Tuples, on return unique tuples (nz adapted)