All kind of helpful little routines.
- History
- none
- Author
- CJM & JGH
| pure integer function, public util::locate |
( |
integer, dimension(:), intent(in) |
array, |
|
|
integer, intent(in) |
x |
|
) |
| |
Purpose: Given an array array(1:n), and given a value x, a value x_index is returned which is the index value of the array element equal to the value x: x = array(x_index) The array must be monotonic increasing. x_index = 0 is returned, if no array element equal to the value of x was found.
- Parameters
-
- Returns
- ...
- History
- Derived from the locate function described in Numerical Recipes in Fortran 90 (09.01.2004,MK)
Definition at line 60 of file util.F.