VMS Help FORTRAN, Intrinsic Procedures, xCOPY  *Conan The Librarian (sorry for the slow response - running on an old VAX)

  SCOPY (n, x, incx, y, incy)
  DCOPY (n, x, incx, y, incy)
  CCOPY (n, x, incx, y, incy)
  ZCOPY (n, x, incx, y, incy)

  Subroutines that copy selected elements of one array to another
  array.

  These subroutines are part of the BLAS1 Basic Set, and are only
  available on VAX processors.

  Arguments

    n

    Integer number of elements in arrays "x" and "y" to be accessed.

    x

    Array containing the elements to be copied or array reference to
    the first such element.  The data type is REAL*4 for SCOPY,
    REAL*8 for DCOPY, COMPLEX*8 for CCOPY, COMPLEX*16 for ZCOPY.  The
    elements in array "x" are copied to the corresponding elements of
    array "y".

    incx

    Integer index increment used in selecting which elements of array
    "x" are accessed.

    y

    Array containing the elements to receive the copied values or
    array reference to the first such element.  The data type is
    REAL*4 for SCOPY, REAL*8 for DCOPY, COMPLEX*8 for CCOPY,
    COMPLEX*16 for ZCOPY.  The elements of array "y" are replaced by
    the corresponding elements of array "x".

    incy

    Integer index increment used in selecting which elements of array
    "y" are accessed.