libflame revision_anchor
Functions
bli_scal.c File Reference

(r)

Functions

void bli_sscal (int n, float *alpha, float *x, int incx)
void bli_dscal (int n, double *alpha, double *x, int incx)
void bli_csscal (int n, float *alpha, scomplex *x, int incx)
void bli_cscal (int n, scomplex *alpha, scomplex *x, int incx)
void bli_zdscal (int n, double *alpha, dcomplex *x, int incx)
void bli_zscal (int n, dcomplex *alpha, dcomplex *x, int incx)

Function Documentation

void bli_cscal ( int  n,
scomplex alpha,
scomplex x,
int  incx 
)

References cblas_cscal(), and F77_cscal().

Referenced by bli_caxpysmt(), bli_caxpysv(), bli_cinvscalm(), bli_cinvscalv(), bli_cscalm(), bli_cscalmr(), bli_cscalv(), and FLA_SA_LU_unb().

{
#ifdef BLIS_ENABLE_CBLAS_INTERFACES
    cblas_cscal( n,
                 alpha,
                 x, incx );
#else
    F77_cscal( &n,
               alpha,
               x, &incx );
#endif
}
void bli_csscal ( int  n,
float *  alpha,
scomplex x,
int  incx 
)

References cblas_csscal(), and F77_csscal().

Referenced by bli_csinvscalm(), bli_csinvscalv(), bli_csscalm(), bli_csscalmr(), and bli_csscalv().

{
#ifdef BLIS_ENABLE_CBLAS_INTERFACES
    cblas_csscal( n,
                  *alpha,
                  x, incx );
#else
    F77_csscal( &n,
                alpha,
                x, &incx );
#endif
}
void bli_dscal ( int  n,
double *  alpha,
double *  x,
int  incx 
)

References cblas_dscal(), and F77_dscal().

Referenced by bli_daxpysmt(), bli_daxpysv(), bli_dinvscalm(), bli_dinvscalv(), bli_dscalm(), bli_dscalmr(), bli_dscalv(), bli_zconjm(), bli_zconjmr(), bli_zconjv(), and FLA_SA_LU_unb().

{
#ifdef BLIS_ENABLE_CBLAS_INTERFACES
    cblas_dscal( n,
                 *alpha,
                 x, incx );
#else
    F77_dscal( &n,
               alpha,
               x, &incx );
#endif
}
void bli_sscal ( int  n,
float *  alpha,
float *  x,
int  incx 
)

References cblas_sscal(), and F77_sscal().

Referenced by bli_cconjm(), bli_cconjmr(), bli_cconjv(), bli_saxpysmt(), bli_saxpysv(), bli_sinvscalm(), bli_sinvscalv(), bli_sscalm(), bli_sscalmr(), bli_sscalv(), and FLA_SA_LU_unb().

{
#ifdef BLIS_ENABLE_CBLAS_INTERFACES
    cblas_sscal( n,
                 *alpha,
                 x, incx );
#else
    F77_sscal( &n,
               alpha,
               x, &incx );
#endif
}
void bli_zdscal ( int  n,
double *  alpha,
dcomplex x,
int  incx 
)

References cblas_zdscal(), and F77_zdscal().

Referenced by bli_zdinvscalm(), bli_zdinvscalv(), bli_zdscalm(), bli_zdscalmr(), and bli_zdscalv().

{
#ifdef BLIS_ENABLE_CBLAS_INTERFACES
    cblas_zdscal( n,
                  *alpha,
                  x, incx );
#else
    F77_zdscal( &n,
                alpha,
                x, &incx );
#endif
}
void bli_zscal ( int  n,
dcomplex alpha,
dcomplex x,
int  incx 
)

References cblas_zscal(), and F77_zscal().

Referenced by bli_zaxpysmt(), bli_zaxpysv(), bli_zinvscalm(), bli_zinvscalv(), bli_zscalm(), bli_zscalmr(), bli_zscalv(), and FLA_SA_LU_unb().

{
#ifdef BLIS_ENABLE_CBLAS_INTERFACES
    cblas_zscal( n,
                 alpha,
                 x, incx );
#else
    F77_zscal( &n,
               alpha,
               x, &incx );
#endif
}