libflame revision_anchor
Functions
bl1_scal.c File Reference

(r)

Functions

void bl1_sscal (int n, float *alpha, float *x, int incx)
 
void bl1_dscal (int n, double *alpha, double *x, int incx)
 
void bl1_csscal (int n, float *alpha, scomplex *x, int incx)
 
void bl1_cscal (int n, scomplex *alpha, scomplex *x, int incx)
 
void bl1_zdscal (int n, double *alpha, dcomplex *x, int incx)
 
void bl1_zscal (int n, dcomplex *alpha, dcomplex *x, int incx)
 

Function Documentation

◆ bl1_cscal()

void bl1_cscal ( int  n,
scomplex alpha,
scomplex x,
int  incx 
)
53{
54#ifdef BLIS1_ENABLE_CBLAS_INTERFACES
55 cblas_cscal( n,
56 alpha,
57 x, incx );
58#else
59 F77_cscal( &n,
60 alpha,
61 x, &incx );
62#endif
63}
int i
Definition bl1_axmyv2.c:145
void F77_cscal(int *n, scomplex *alpha, scomplex *y, int *incy)
void cblas_cscal(const int N, const void *alpha, void *X, const int incX)

References cblas_cscal(), and F77_cscal().

Referenced by bl1_caxpysmt(), bl1_caxpysv(), bl1_cinvscalm(), bl1_cinvscalv(), bl1_cscalm(), bl1_cscalmr(), bl1_cscalv(), and FLA_SA_LU_unb().

◆ bl1_csscal()

void bl1_csscal ( int  n,
float alpha,
scomplex x,
int  incx 
)
40{
41#ifdef BLIS1_ENABLE_CBLAS_INTERFACES
42 cblas_csscal( n,
43 *alpha,
44 x, incx );
45#else
46 F77_csscal( &n,
47 alpha,
48 x, &incx );
49#endif
50}
void F77_csscal(int *n, float *alpha, scomplex *y, int *incy)
void cblas_csscal(const int N, const float alpha, void *X, const int incX)

References cblas_csscal(), and F77_csscal().

Referenced by bl1_csinvscalm(), bl1_csinvscalv(), bl1_csscalm(), bl1_csscalmr(), and bl1_csscalv().

◆ bl1_dscal()

void bl1_dscal ( int  n,
double alpha,
double x,
int  incx 
)
27{
28#ifdef BLIS1_ENABLE_CBLAS_INTERFACES
29 cblas_dscal( n,
30 *alpha,
31 x, incx );
32#else
33 F77_dscal( &n,
34 alpha,
35 x, &incx );
36#endif
37}
void F77_dscal(int *n, double *alpha, double *y, int *incy)
void cblas_dscal(const int N, const double alpha, double *X, const int incX)

References cblas_dscal(), and F77_dscal().

Referenced by bl1_daxpysmt(), bl1_daxpysv(), bl1_dinvscalm(), bl1_dinvscalv(), bl1_dscalm(), bl1_dscalmr(), bl1_dscalv(), bl1_zconjm(), bl1_zconjmr(), bl1_zconjv(), and FLA_SA_LU_unb().

◆ bl1_sscal()

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

References cblas_sscal(), and F77_sscal().

Referenced by bl1_cconjm(), bl1_cconjmr(), bl1_cconjv(), bl1_saxpysmt(), bl1_saxpysv(), bl1_sinvscalm(), bl1_sinvscalv(), bl1_sscalm(), bl1_sscalmr(), bl1_sscalv(), and FLA_SA_LU_unb().

◆ bl1_zdscal()

void bl1_zdscal ( int  n,
double alpha,
dcomplex x,
int  incx 
)
66{
67#ifdef BLIS1_ENABLE_CBLAS_INTERFACES
68 cblas_zdscal( n,
69 *alpha,
70 x, incx );
71#else
72 F77_zdscal( &n,
73 alpha,
74 x, &incx );
75#endif
76}
void F77_zdscal(int *n, double *alpha, dcomplex *y, int *incy)
void cblas_zdscal(const int N, const double alpha, void *X, const int incX)

References cblas_zdscal(), and F77_zdscal().

Referenced by bl1_zdinvscalm(), bl1_zdinvscalv(), bl1_zdscalm(), bl1_zdscalmr(), and bl1_zdscalv().

◆ bl1_zscal()

void bl1_zscal ( int  n,
dcomplex alpha,
dcomplex x,
int  incx 
)
79{
80#ifdef BLIS1_ENABLE_CBLAS_INTERFACES
81 cblas_zscal( n,
82 alpha,
83 x, incx );
84#else
85 F77_zscal( &n,
86 alpha,
87 x, &incx );
88#endif
89}
void F77_zscal(int *n, dcomplex *alpha, dcomplex *y, int *incy)
void cblas_zscal(const int N, const void *alpha, void *X, const int incX)

References cblas_zscal(), and F77_zscal().

Referenced by bl1_zaxpysmt(), bl1_zaxpysv(), bl1_zinvscalm(), bl1_zinvscalv(), bl1_zscalm(), bl1_zscalmr(), bl1_zscalv(), and FLA_SA_LU_unb().