Previous: utidt Up: ../plot79_u.html Next: utisl
SUBROUTINE UTIFA (IV,NV,INCV,IFILL) C$ (INTEGER Fill Array) C$ Fill a vector IV(*) with the value "IFILL". The arguments C$ are: C$ C$ IV(*)..........Vector to be filled. C$ NV.............Number of elements to fill. C$ INCV...........Increment between successive elements of C$ IV(*). If it is negative, the K-th element C$ of IV 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$ IFILL..........Fill value. C$ (09-APR-82)