SCOPY(1)

NAME
LAPACK-3 - SCOPY copie a vector, x, to a vector, y

SYNOPSIS

SUBROUTINE SCOPY(N,SX,INCX,SY,INCY)

INTEGER
    INCX,INCY,N

REAL
    SX(*),SY(*)

PURPOSE
   SCOPY copies a vector, x, to a vector, y.
    uses unrolled loops for increments equal to 1.

FURTHER DETAILS
    jack dongarra, linpack, 3/11/78.
    modified 12/3/93, array(1) declarations changed to array(*)