index_unique Subroutine

public subroutine index_unique(index_in, index_out)

Get all unique elements in index_in

Arguments

Type IntentOptional Attributes Name
integer, intent(in), DIMENSION(:, :) :: index_in
integer, intent(out), ALLOCATABLE, DIMENSION(:, :) :: index_out