maxvalID Interface

public interface maxvalID

Module Procedures

public pure recursive function maxvalIDInt32(vec, opt_id) result(id)

Arguments

Type IntentOptional Attributes Name
integer(kind=int32), intent(in) :: vec(:)
integer(kind=int32), intent(in), optional :: opt_id

Return Value integer(kind=int32)

public pure recursive function maxvalIDReal64(vec, opt_id) result(id)

Arguments

Type IntentOptional Attributes Name
real(kind=real64), intent(in) :: vec(:)
integer(kind=int32), intent(in), optional :: opt_id

Return Value integer(kind=int32)

public pure function maxvalIDReal64_Array(value_list) result(ret)

Arguments

Type IntentOptional Attributes Name
real(kind=real64), intent(in) :: value_list(:,:)

Return Value integer(kind=int32), (1:2)