函数语法:
saxpy(int n,float sa, float x[],int incx, float y[], int incy)
功能:
AXPY是 BLAS 中 第1级函数。AXPY计算向量的数乘运算和向量的加法运算。
| Y | | X | | Y |
| Y | | X | | Y |
| Y | = sa | X | + | Y |
| Y | | X | | Y |
| Y | | X | | Y |
Fortran语言版SAXPY
源代码:
SUBROUTINE SAXPY(N,SA,SX,INCX,SY,INCY)
* .. Scalar Arguments ..
REAL SA
INTEGER INCX,INCY,N
* ..
* .. Array Arguments ..
REAL SX(*),SY(*)
* ..
*
* Purpose
* =======
*
* SAXPY constant times a vector plus a vector.
* uses unrolled loop for increments equal to one.
* jack dongarra, linpack, 3/11/78.
* modified 12/3/93, array(1) declarations ch