get_index Interface

public interface get_index

interface to retrieve the index of an element in an array.


Contents


Module Procedures

private pure function find_index_in_character_array(name, array) result(match_idx)

Function to locate the index of a given character in a character array. Iterates over the elements and returns on the first hit, if no match was found zero is returned.

Arguments

TypeIntentOptionalAttributesName
character(len=*), intent(in) :: name

the name to search for

character(len=*), intent(in) :: array(:)

array with the names to search in

Return Value integer

index of first match

private pure function find_indices_in_character_array(names, array) result(match_idxs)

Function to locate the indices of an array of characters in another character array. Returns the indices of the first hit, it no match was found zero is returned.

Arguments

TypeIntentOptionalAttributesName
character(len=*), intent(in) :: names(:)

the names to search for

character(len=*), intent(in) :: array(:)

array in which to sarch in

Return Value integer(size(names))

index of first matches