r8vec_unique_count Subroutine

public subroutine r8vec_unique_count(n, a, tol, unique_num)

R8VEC_UNIQUE_COUNT counts the unique elements in an unsorted R8VEC.

Arguments

Type IntentOptional Attributes Name
integer(kind=4) :: n
real(kind=8) :: a(n)
real(kind=8) :: tol
integer(kind=4) :: unique_num

Called by

proc~~r8vec_unique_count~~CalledByGraph proc~r8vec_unique_count r8vec_unique_count proc~least_set least_set proc~least_set->proc~r8vec_unique_count