%N isrchige %F $MIR/src/subs/math.for
%D Search integer vector for target.
%P pjt
%: scilib
%B
        integer function isrchige(n,array,inc,target)

        implicit none
        integer n,inc
        integer array(*),target

  Isrchige returns the first location in an integer array that is greater
  or equal to the integer target.

  Inputs:
    n          Number of elements to be searched.
    array      The integer array to be searched.
    inc        Skip distance between elements of the searched array.
    target     Integer value searched for in the array. If target is not
               found, then the routine returns n+1.
  Output:
    isrchieq   Index of the first occurrence of something greater or equal
               to the integer target.

  Reference:
  See page 4-59 to 4-64 of the Cray "Library Reference Manual".
