Copy vector | F_SCOPY/F_DCOPY/F_CCOPY/F_ZCOPY |
Name | F_SCOPY/F_DCOPY/F_CCOPY/F_ZCOPY |
| Copy vector |
Purpose | F_xCOPY copies the vector x into the vector y, that is, |
| y ← x |
| If n is less than or equal to zero, the routine returns immediately. |
Usage | VECLIB: |
| INTEGER | INCX, INCY, N |
| REAL*4 | X( * ), Y( * ) |
| SUBROUTINE F_SCOPY (N, X, INCX, Y, INCY) | |
| INTEGER | INCX, INCY, N |
| REAL*8 | X( * ), Y( * ) |
| SUBROUTINE F_DCOPY (N, X, INCX, Y, INCY) | |
| INTEGER | INCX, INCY, N |
| COMPLEX*8 | X( * ), Y( * ) |
| SUBROUTINE F_CCOPY (N, X, INCX, Y, INCY) | |
| INTEGER | INCX, INCY, N |
| COMPLEX*16 | X( * ), Y( * ) |
| SUBROUTINE F_ZCOPY (N, X, INCX, Y, INCY) | |
| VECLIB8: |
|
| INTEGER*8 | INCX, INCY, N |
| REAL*4 | X( * ), Y( * ) |
| SUBROUTINE F_SCOPY (N, X, INCX, Y, INCY) | |
| INTEGER*8 | INCX, INCY, N |
| REAL*8 | X( * ), Y( * ) |
| SUBROUTINE F_DCOPY (N, X, INCX, Y, INCY) | |
| INTEGER*8 | INCX, INCY, N |
| COMPLEX*8 | X( * ), Y( * ) |
| SUBROUTINE F_CCOPY (N, X, INCX, Y, INCY) | |
| INTEGER*8 | INCX, INCY, N |
| COMPLEX*16 | X( * ), Y( * ) |
| SUBROUTINE F_ZCOPY (N, X, INCX, Y, INCY) | |
Input | N | Number of elements of vector x. |
Chapter 2 Basic Vector Operations 167