Previous: utrs1 Up: ../plot79_u.html Next: utrs3

UTRS2

       SUBROUTINE  UTRS2 (XMIN,XMAX, N, XMINP,XMAXP, DIST)
 C$    (Define Linear Scale Limits - Fixed Interval)
 C$    Given estimated maximum and minimum values and a  requested
 C$    number of intervals,  adjust the extrema  to encompass  the
 C$    same number of equal intervals of size DIST, such that they
 C$    are "nice" values for a plot.
 C$
 C$    The input arguments are:
 C$
 C$    XMIN.......Approximate minimum value.
 C$    XMAX.......Approximate maximum value.
 C$    N..........Exact number of data intervals required.
 C$
 C$    The output arguments are:
 C$
 C$    XMINP......Adjusted minimum value.
 C$    XMAXP......Adjusted maximum value.
 C$    DIST.......Data interval size.
 C$
 C$    XMIN, XMAX, and N are not modified.
 C$
 C$    VINT(*) is an array of acceptable vales for DIST (times  an
 C$    integer power of 10).
 C$
 C$    Author:  C.R. Lewart, Comm. ACM.  Algorithm 463 (1972).
 C$
 C$    (02-APR-82)