libflame  revision_anchor
Functions
bl1_axpy.c File Reference

(r)

Functions

void bl1_saxpy (int n, float *alpha, float *x, int incx, float *y, int incy)
 
void bl1_daxpy (int n, double *alpha, double *x, int incx, double *y, int incy)
 
void bl1_caxpy (int n, scomplex *alpha, scomplex *x, int incx, scomplex *y, int incy)
 
void bl1_zaxpy (int n, dcomplex *alpha, dcomplex *x, int incx, dcomplex *y, int incy)
 

Function Documentation

◆ bl1_caxpy()

void bl1_caxpy ( int  n,
scomplex alpha,
scomplex x,
int  incx,
scomplex y,
int  incy 
)

References cblas_caxpy(), and F77_caxpy().

Referenced by bl1_caxpymt(), bl1_caxpysmt(), bl1_caxpysv(), and bl1_caxpyv().

44 {
45 #ifdef BLIS1_ENABLE_CBLAS_INTERFACES
46  cblas_caxpy( n,
47  alpha,
48  x, incx,
49  y, incy );
50 #else
51  F77_caxpy( &n,
52  alpha,
53  x, &incx,
54  y, &incy );
55 #endif
56 }
void F77_caxpy(int *n, scomplex *alpha, scomplex *x, int *incx, scomplex *y, int *incy)
void cblas_caxpy(const int N, const void *alpha, const void *X, const int incX, void *Y, const int incY)

◆ bl1_daxpy()

void bl1_daxpy ( int  n,
double *  alpha,
double *  x,
int  incx,
double *  y,
int  incy 
)

References cblas_daxpy(), and F77_daxpy().

Referenced by bl1_daxpymt(), bl1_daxpysmt(), bl1_daxpysv(), and bl1_daxpyv().

29 {
30 #ifdef BLIS1_ENABLE_CBLAS_INTERFACES
31  cblas_daxpy( n,
32  *alpha,
33  x, incx,
34  y, incy );
35 #else
36  F77_daxpy( &n,
37  alpha,
38  x, &incx,
39  y, &incy );
40 #endif
41 }
void cblas_daxpy(const int N, const double alpha, const double *X, const int incX, double *Y, const int incY)
void F77_daxpy(int *n, double *alpha, double *x, int *incx, double *y, int *incy)

◆ bl1_saxpy()

void bl1_saxpy ( int  n,
float *  alpha,
float *  x,
int  incx,
float *  y,
int  incy 
)

References cblas_saxpy(), and F77_saxpy().

Referenced by bl1_saxpymt(), bl1_saxpysmt(), bl1_saxpysv(), and bl1_saxpyv().

14 {
15 #ifdef BLIS1_ENABLE_CBLAS_INTERFACES
16  cblas_saxpy( n,
17  *alpha,
18  x, incx,
19  y, incy );
20 #else
21  F77_saxpy( &n,
22  alpha,
23  x, &incx,
24  y, &incy );
25 #endif
26 }
void cblas_saxpy(const int N, const float alpha, const float *X, const int incX, float *Y, const int incY)
void F77_saxpy(int *n, float *alpha, float *x, int *incx, float *y, int *incy)

◆ bl1_zaxpy()

void bl1_zaxpy ( int  n,
dcomplex alpha,
dcomplex x,
int  incx,
dcomplex y,
int  incy 
)

References cblas_zaxpy(), and F77_zaxpy().

Referenced by bl1_zaxpymt(), bl1_zaxpysmt(), bl1_zaxpysv(), and bl1_zaxpyv().

59 {
60 #ifdef BLIS1_ENABLE_CBLAS_INTERFACES
61  cblas_zaxpy( n,
62  alpha,
63  x, incx,
64  y, incy );
65 #else
66  F77_zaxpy( &n,
67  alpha,
68  x, &incx,
69  y, &incy );
70 #endif
71 }
void F77_zaxpy(int *n, dcomplex *alpha, dcomplex *x, int *incx, dcomplex *y, int *incy)
void cblas_zaxpy(const int N, const void *alpha, const void *X, const int incX, void *Y, const int incY)