M01NCF examines an ordered vector of null terminated strings and returns the index of the first value equal to the sought-after item. Character items are compared according to the ASCII collating sequence.
M01NCF 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
CH is in fact arranged in ascending order. If you wish to search the same array
CH many times, you are recommended to set
VALID to .TRUE. on first call of M01NCF and to .FALSE. on subsequent calls, in order to minimize the amount of time spent checking
CH, which may be significant if
CH is large.
This example reads a list of character data and sought-after items and performs the search for these items.