Previous: utitty Up: ../plot79_u.html Next: utrba

UTLFA

       SUBROUTINE  UTLFA (LV,NV,INCV,LFILL)
 C$    (LOGICAL Fill Array)
 C$    Fill a vector LV(*) with the value "LFILL".  The  arguments
 C$    are:
 C$
 C$    LV(*)..........Vector to be filled.
 C$    NV.............Number of elements to fill.
 C$    INCV...........Increment  between  successive  elements  of
 C$                   LV(*).  If it is negative, the K-th  element
 C$                   of LV  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$    LFILL..........Fill value.
 C$    (09-APR-82)