Previous: utrca Up: ../plot79_u.html Next: utre2

UTRCO

       INTEGER FUNCTION  UTRCO (ARRAY,INCA,NA)
 C$    (Check Order)
 C$    Check the order of values in an array returning an  integer
 C$    function value as follows
 C$
 C$    +3 - No ordering                   (possibly NA .LE. 1)
 C$    +2 - ARRAY(I) .GE. ARRAY(I-1)      (non-decreasing)
 C$    +1 - ARRAY(I) .GT. ARRAY(I-1)      (strictly increasing)
 C$     0 - ARRAY(I) .EQ. ARRAY(I-1)      (identical values)
 C$    -1 - ARRAY(I) .LT. ARRAY(I-1)      (strictly decreasing)
 C$    -2 - ARRAY(I) .LE. ARRAY(I-1)      (non-increasing)
 C$
 C$    The arguments are:
 C$
 C$    ARRAY(*).........Array of values.
 C$    INCA.............Increment between successive values in
 C$                     ARRAY(*) (normally +1).
 C$    NA...............Number of values.  That is, elements
 C$                     ARRAY(1), ARRAY(INCA+1), ...,
 C$                     ARRAY(INCA*(NA-1)+1) will be examined.
 C$    (15-APR-82)