libflame revision_anchor
Functions
bl1_copy.c File Reference

(r)

Functions

void bl1_scopy (int m, float *x, int incx, float *y, int incy)
 
void bl1_dcopy (int m, double *x, int incx, double *y, int incy)
 
void bl1_ccopy (int m, scomplex *x, int incx, scomplex *y, int incy)
 
void bl1_zcopy (int m, dcomplex *x, int incx, dcomplex *y, int incy)
 

Function Documentation

◆ bl1_ccopy()

void bl1_ccopy ( int  m,
scomplex x,
int  incx,
scomplex y,
int  incy 
)
40{
41#ifdef BLIS1_ENABLE_CBLAS_INTERFACES
42 cblas_ccopy( m,
43 x, incx,
44 y, incy );
45#else
46 F77_ccopy( &m,
47 x, &incx,
48 y, &incy );
49#endif
50}
int i
Definition bl1_axmyv2.c:145
void F77_ccopy(int *n, scomplex *x, int *incx, scomplex *y, int *incy)
void cblas_ccopy(const int N, const void *X, const int incX, void *Y, const int incY)

References cblas_ccopy(), and F77_ccopy().

Referenced by bl1_ccopymr(), bl1_ccopymt(), bl1_ccopyv(), and FLA_SA_LU_unb().

◆ bl1_dcopy()

void bl1_dcopy ( int  m,
double x,
int  incx,
double y,
int  incy 
)
27{
28#ifdef BLIS1_ENABLE_CBLAS_INTERFACES
29 cblas_dcopy( m,
30 x, incx,
31 y, incy );
32#else
33 F77_dcopy( &m,
34 x, &incx,
35 y, &incy );
36#endif
37}
void F77_dcopy(int *n, double *x, int *incx, double *y, int *incy)
void cblas_dcopy(const int N, const double *X, const int incX, double *Y, const int incY)

References cblas_dcopy(), and F77_dcopy().

Referenced by bl1_dcopymr(), bl1_dcopymt(), bl1_dcopyv(), FLA_Obj_extract_imag_part(), FLA_Obj_extract_real_part(), and FLA_SA_LU_unb().

◆ bl1_scopy()

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

References cblas_scopy(), and F77_scopy().

Referenced by bl1_scopymr(), bl1_scopymt(), bl1_scopyv(), FLA_Obj_extract_imag_part(), FLA_Obj_extract_real_part(), and FLA_SA_LU_unb().

◆ bl1_zcopy()

void bl1_zcopy ( int  m,
dcomplex x,
int  incx,
dcomplex y,
int  incy 
)
53{
54#ifdef BLIS1_ENABLE_CBLAS_INTERFACES
55 cblas_zcopy( m,
56 x, incx,
57 y, incy );
58#else
59 F77_zcopy( &m,
60 x, &incx,
61 y, &incy );
62#endif
63}
void F77_zcopy(int *n, dcomplex *x, int *incx, dcomplex *y, int *incy)
void cblas_zcopy(const int N, const void *X, const int incX, void *Y, const int incY)

References cblas_zcopy(), and F77_zcopy().

Referenced by bl1_zcopymr(), bl1_zcopymt(), bl1_zcopyv(), and FLA_SA_LU_unb().