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
}