libflame revision_anchor
Functions
bli_axpy.c File Reference

(r)

Functions

void bli_saxpy (int n, float *alpha, float *x, int incx, float *y, int incy)
void bli_daxpy (int n, double *alpha, double *x, int incx, double *y, int incy)
void bli_caxpy (int n, scomplex *alpha, scomplex *x, int incx, scomplex *y, int incy)
void bli_zaxpy (int n, dcomplex *alpha, dcomplex *x, int incx, dcomplex *y, int incy)

Function Documentation

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

References cblas_caxpy(), and F77_caxpy().

Referenced by bli_caxpymt(), bli_caxpysmt(), bli_caxpysv(), and bli_caxpyv().

{
#ifdef BLIS_ENABLE_CBLAS_INTERFACES
    cblas_caxpy( n,
                 alpha,
                 x, incx,
                 y, incy );
#else
    F77_caxpy( &n,
               alpha,
               x, &incx,
               y, &incy );
#endif
}
void bli_daxpy ( int  n,
double *  alpha,
double *  x,
int  incx,
double *  y,
int  incy 
)

References cblas_daxpy(), and F77_daxpy().

Referenced by bli_daxpymt(), bli_daxpysmt(), bli_daxpysv(), and bli_daxpyv().

{
#ifdef BLIS_ENABLE_CBLAS_INTERFACES
    cblas_daxpy( n,
                 *alpha,
                 x, incx,
                 y, incy );
#else
    F77_daxpy( &n,
               alpha,
               x, &incx,
               y, &incy );
#endif
}
void bli_saxpy ( int  n,
float *  alpha,
float *  x,
int  incx,
float *  y,
int  incy 
)

References cblas_saxpy(), and F77_saxpy().

Referenced by bli_saxpymt(), bli_saxpysmt(), bli_saxpysv(), and bli_saxpyv().

{
#ifdef BLIS_ENABLE_CBLAS_INTERFACES
    cblas_saxpy( n,
                 *alpha,
                 x, incx,
                 y, incy );
#else
    F77_saxpy( &n,
               alpha,
               x, &incx,
               y, &incy );
#endif
}
void bli_zaxpy ( int  n,
dcomplex alpha,
dcomplex x,
int  incx,
dcomplex y,
int  incy 
)

References cblas_zaxpy(), and F77_zaxpy().

Referenced by bli_zaxpymt(), bli_zaxpysmt(), bli_zaxpysv(), and bli_zaxpyv().

{
#ifdef BLIS_ENABLE_CBLAS_INTERFACES
    cblas_zaxpy( n,
                 alpha,
                 x, incx,
                 y, incy );
#else
    F77_zaxpy( &n,
               alpha,
               x, &incx,
               y, &incy );
#endif
}