Previous: utrsb Up: ../plot79_u.html Next: utrxp

UTRSC

       SUBROUTINE  UTRSC (V,NV,INCV,SCALE)
 C$    (REAL Scale Array)
 C$    Scale a vector V(*) by multiplying by a constant value "SCALE".
 C$    The arguments are:
 C$
 C$    V(*)...........Vector to be scaled.
 C$    NV.............Number of elements to scale.
 C$    INCV...........Increment  between  successive  elements  of
 C$                   V(*).  If it is  negative, the K-th  element
 C$                   of V  is  at  storage location  1  +  (NV  -
 C$                   K)*IABS(INCV).  If it is positive, the  K-th
 C$                   element is  at location  1 +  (K -  1)*INCV.
 C$                   This is the same  convention as used in  the
 C$                   BLAS.
 C$    SCALE..........Scale factor.
 C$    (09-APR-82)