M01NAF searches an ordered vector of real numbers and returns the index of the first value equal to the sought-after item.
M01NAF is based on Professor Niklaus Wirth's implementation of the Binary Search algorithm (see
Wirth (2004)), but with two modifications. First, if the sought-after item is less than the value of the first element of the array to be searched,
is returned. Second, if a value equal to the sought-after item is not found, the index of the immediate lower value is returned.
If on entry
or
, explanatory error messages are output on the current error message unit (as defined by
X04AAF).
Not applicable.
The argument
VALID should be used with caution. Set it to .FALSE. only if you are confident that the other arguments are correct, in particular that array
RV is in fact arranged in ascending order. If you wish to search the same array
RV many times, you are recommended to set
VALID to .TRUE. on first call of M01NAF and to .FALSE. on subsequent calls, in order to minimize the amount of time spent checking
RV, which may be significant if
RV is large.
This example reads a list of double precision numbers and sought-after items and performs the search for these items.