idamax finds the index of the first element having maximum absolute value.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer(kind=ip) | :: | n | ||||
| real(kind=wp) | :: | dx(*) | ||||
| integer(kind=ip) | :: | incx |
integer(ip) function idamax(n, dx, incx) import implicit none integer(ip) :: incx, n real(wp) :: dx(*) end function idamax