SCOPY/DCOPY/ICOPY/CCOPY/CCOPYC/ZCOPY/ZCOPYC | Copy vector |
Name SCOPY/DCOPY/ICOPY/CCOPY/CCOPYC/ZCOPY/ZCOPYC Copy vector
Purpose Given real, integer, or complex vectors x and y of length n, these subprograms perform the vector copy operations
y ← x and y ← x
where x is the complex conjugate of x. The vectors can be stored in
Usage | VECLIB: |
|
| INTEGER*4 | n, incx, incy |
| REAL*4 | x(lenx), y(leny) |
| CALL SCOPY(n, x, incx, y, incy) | |
| INTEGER*4 | n, incx, incy |
| REAL*8 | x(lenx), y(leny) |
| CALL DCOPY(n, x, incx, y, incy) | |
| INTEGER*4 | n, incx, incy, x(lenx), y(leny) |
| CALL ICOPY(n, x, incx, y, incy) | |
| INTEGER*4 | n, incx, incy |
| COMPLEX*8 | x(lenx), y(leny) |
| CALL CCOPY(n, x, incx, y, incy) | |
| INTEGER*4 | n, incx, incy |
| COMPLEX*8 | x(lenx), y(leny) |
| CALL CCOPYC(n, x, incx, y, incy) | |
| INTEGER*4 | n, incx, incy |
| COMPLEX*16 | x(lenx), y(leny) |
| CALL ZCOPY(n, x, incx, y, incy) | |
| INTEGER*4 | n, incx, incy |
| COMPLEX*16 | x(lenx), y(leny) |
CALL ZCOPYC(n, x, incx, y, incy)
VECLIB8:
INTEGER*8 | n, incx, incy |
REAL*4 | x(lenx), y(leny) |
CALL SCOPY(n, x, incx, y, incy)
80HP MLIB User’s Guide