libflame revision_anchor
|
Functions | |
void | bli_icopyv (char conj, int m, int *x, int incx, int *y, int incy) |
void | bli_scopyv (char conj, int m, float *x, int incx, float *y, int incy) |
void | bli_dcopyv (char conj, int m, double *x, int incx, double *y, int incy) |
void | bli_ccopyv (char conj, int m, scomplex *x, int incx, scomplex *y, int incy) |
void | bli_zcopyv (char conj, int m, dcomplex *x, int incx, dcomplex *y, int incy) |
void | bli_sdcopyv (char conj, int m, float *x, int incx, double *y, int incy) |
void | bli_dscopyv (char conj, int m, double *x, int incx, float *y, int incy) |
void | bli_sccopyv (char conj, int m, float *x, int incx, scomplex *y, int incy) |
void | bli_cscopyv (char conj, int m, scomplex *x, int incx, float *y, int incy) |
void | bli_szcopyv (char conj, int m, float *x, int incx, dcomplex *y, int incy) |
void | bli_zscopyv (char conj, int m, dcomplex *x, int incx, float *y, int incy) |
void | bli_dccopyv (char conj, int m, double *x, int incx, scomplex *y, int incy) |
void | bli_cdcopyv (char conj, int m, scomplex *x, int incx, double *y, int incy) |
void | bli_dzcopyv (char conj, int m, double *x, int incx, dcomplex *y, int incy) |
void | bli_zdcopyv (char conj, int m, dcomplex *x, int incx, double *y, int incy) |
void | bli_czcopyv (char conj, int m, scomplex *x, int incx, dcomplex *y, int incy) |
void | bli_zccopyv (char conj, int m, dcomplex *x, int incx, scomplex *y, int incy) |
References bli_cconjv(), bli_ccopy(), bli_does_conj(), and bli_zero_dim1().
Referenced by bli_caxpymt(), bli_caxpysmt(), bli_caxpyv(), bli_cccopymr(), bli_cccopymrt(), bli_cccopymt(), bli_ccopymrt(), bli_cgemv(), bli_cger(), bli_chemv(), bli_cher(), bli_cher2(), bli_csymmize(), bli_csymv_blas(), bli_csyr2_blas(), bli_csyr_blas(), bli_ctrmv(), bli_ctrmvsx(), bli_ctrsv(), bli_ctrsvsx(), FLA_Accum_T_UT_fc_opc_var1(), FLA_Accum_T_UT_fr_opc_var1(), FLA_Apply_H2_UT_l_opc_var1(), FLA_Apply_H2_UT_r_opc_var1(), FLA_Apply_HUD_UT_l_opc_var1(), FLA_Bidiag_UT_u_step_ofc_var2(), FLA_Bidiag_UT_u_step_ofc_var3(), FLA_Bidiag_UT_u_step_ofc_var4(), FLA_Bidiag_UT_u_step_opc_var1(), FLA_Bidiag_UT_u_step_opc_var2(), FLA_Bidiag_UT_u_step_opc_var3(), FLA_Bidiag_UT_u_step_opc_var4(), FLA_Bidiag_UT_u_step_opc_var5(), FLA_Eig_gest_il_opc_var3(), FLA_Eig_gest_iu_opc_var3(), FLA_Fused_UYx_ZVx_opc_var1(), FLA_Hess_UT_step_ofc_var3(), FLA_Hess_UT_step_opc_var3(), FLA_Hess_UT_step_opc_var5(), FLA_LQ_UT_opc_var2(), FLA_QR_UT_opc_var2(), FLA_Tridiag_UT_l_step_ofc_var2(), and FLA_Tridiag_UT_l_step_opc_var2().
{ // Return early if possible. if ( bli_zero_dim1( m ) ) return; bli_ccopy( m, x, incx, y, incy ); if ( bli_does_conj( conj ) ) bli_cconjv( m, y, incy ); }
void bli_cdcopyv | ( | char | conj, |
int | m, | ||
scomplex * | x, | ||
int | incx, | ||
double * | y, | ||
int | incy | ||
) |
References bli_zero_dim1(), and scomplex::real.
Referenced by bli_cdcopymr(), bli_cdcopymrt(), and bli_cdcopymt().
{ scomplex* chi; double* psi; int i; // Return early if possible. if ( bli_zero_dim1( m ) ) return; // Initialize pointers. chi = x; psi = y; for ( i = 0; i < m; ++i ) { *psi = chi->real; chi += incx; psi += incy; } }
void bli_cscopyv | ( | char | conj, |
int | m, | ||
scomplex * | x, | ||
int | incx, | ||
float * | y, | ||
int | incy | ||
) |
References bli_zero_dim1(), and scomplex::real.
Referenced by bli_cscopymr(), bli_cscopymrt(), and bli_cscopymt().
{ scomplex* chi; float* psi; int i; // Return early if possible. if ( bli_zero_dim1( m ) ) return; // Initialize pointers. chi = x; psi = y; for ( i = 0; i < m; ++i ) { *psi = chi->real; chi += incx; psi += incy; } }
References bli_does_conj(), bli_zconjv(), bli_zero_dim1(), scomplex::imag, dcomplex::imag, scomplex::real, and dcomplex::real.
Referenced by bli_czcopymr(), bli_czcopymrt(), and bli_czcopymt().
{ scomplex* chi; dcomplex* psi; int i; // Return early if possible. if ( bli_zero_dim1( m ) ) return; // Initialize pointers. chi = x; psi = y; for ( i = 0; i < m; ++i ) { psi->real = chi->real; psi->imag = chi->imag; chi += incx; psi += incy; } if ( bli_does_conj( conj ) ) bli_zconjv( m, y, incy ); }
void bli_dccopyv | ( | char | conj, |
int | m, | ||
double * | x, | ||
int | incx, | ||
scomplex * | y, | ||
int | incy | ||
) |
References bli_zero_dim1(), scomplex::imag, and scomplex::real.
Referenced by bli_dccopymr(), bli_dccopymrt(), and bli_dccopymt().
{ double* chi; scomplex* psi; int i; // Return early if possible. if ( bli_zero_dim1( m ) ) return; // Initialize pointers. chi = x; psi = y; for ( i = 0; i < m; ++i ) { psi->real = *chi; psi->imag = 0.0F; chi += incx; psi += incy; } }
void bli_dcopyv | ( | char | conj, |
int | m, | ||
double * | x, | ||
int | incx, | ||
double * | y, | ||
int | incy | ||
) |
References bli_dcopy().
Referenced by bli_dcopymrt(), bli_ddcopymr(), bli_ddcopymrt(), bli_ddcopymt(), bli_dsymmize(), bli_dtrmvsx(), bli_dtrsvsx(), FLA_Accum_T_UT_fc_opd_var1(), FLA_Accum_T_UT_fr_opd_var1(), FLA_Apply_H2_UT_l_opd_var1(), FLA_Apply_H2_UT_r_opd_var1(), FLA_Apply_HUD_UT_l_opd_var1(), FLA_Bidiag_UT_u_step_ofd_var2(), FLA_Bidiag_UT_u_step_ofd_var3(), FLA_Bidiag_UT_u_step_ofd_var4(), FLA_Bidiag_UT_u_step_opd_var1(), FLA_Bidiag_UT_u_step_opd_var2(), FLA_Bidiag_UT_u_step_opd_var3(), FLA_Bidiag_UT_u_step_opd_var4(), FLA_Bidiag_UT_u_step_opd_var5(), FLA_Eig_gest_il_opd_var3(), FLA_Eig_gest_iu_opd_var3(), FLA_Fused_UYx_ZVx_opd_var1(), FLA_Hess_UT_step_ofd_var3(), FLA_Hess_UT_step_opd_var3(), FLA_Hess_UT_step_opd_var5(), FLA_LQ_UT_opd_var2(), FLA_QR_UT_opd_var2(), FLA_Tridiag_UT_l_step_ofd_var2(), and FLA_Tridiag_UT_l_step_opd_var2().
{ bli_dcopy( m, x, incx, y, incy ); }
void bli_dscopyv | ( | char | conj, |
int | m, | ||
double * | x, | ||
int | incx, | ||
float * | y, | ||
int | incy | ||
) |
References bli_zero_dim1().
Referenced by bli_dscopymr(), bli_dscopymrt(), and bli_dscopymt().
{ double* chi; float* psi; int i; // Return early if possible. if ( bli_zero_dim1( m ) ) return; // Initialize pointers. chi = x; psi = y; for ( i = 0; i < m; ++i ) { *psi = *chi; chi += incx; psi += incy; } }
void bli_dzcopyv | ( | char | conj, |
int | m, | ||
double * | x, | ||
int | incx, | ||
dcomplex * | y, | ||
int | incy | ||
) |
References bli_zero_dim1(), dcomplex::imag, and dcomplex::real.
Referenced by bli_dzcopymr(), bli_dzcopymrt(), and bli_dzcopymt().
{ double* chi; dcomplex* psi; int i; // Return early if possible. if ( bli_zero_dim1( m ) ) return; // Initialize pointers. chi = x; psi = y; for ( i = 0; i < m; ++i ) { psi->real = *chi; psi->imag = 0.0; chi += incx; psi += incy; } }
void bli_icopyv | ( | char | conj, |
int | m, | ||
int * | x, | ||
int | incx, | ||
int * | y, | ||
int | incy | ||
) |
References bli_zero_dim1().
Referenced by bli_icopymt().
{ int* chi; int* psi; int i; // Return early if possible. if ( bli_zero_dim1( m ) ) return; // Initialize pointers. chi = x; psi = y; for ( i = 0; i < m; ++i ) { *psi = *chi; chi += incx; psi += incy; } }
void bli_sccopyv | ( | char | conj, |
int | m, | ||
float * | x, | ||
int | incx, | ||
scomplex * | y, | ||
int | incy | ||
) |
References bli_zero_dim1(), scomplex::imag, and scomplex::real.
Referenced by bli_sccopymr(), bli_sccopymrt(), and bli_sccopymt().
{ float* chi; scomplex* psi; int i; // Return early if possible. if ( bli_zero_dim1( m ) ) return; // Initialize pointers. chi = x; psi = y; for ( i = 0; i < m; ++i ) { psi->real = *chi; psi->imag = 0.0F; chi += incx; psi += incy; } }
void bli_scopyv | ( | char | conj, |
int | m, | ||
float * | x, | ||
int | incx, | ||
float * | y, | ||
int | incy | ||
) |
References bli_scopy().
Referenced by bli_scopymrt(), bli_sscopymr(), bli_sscopymrt(), bli_sscopymt(), bli_ssymmize(), bli_strmvsx(), bli_strsvsx(), FLA_Accum_T_UT_fc_ops_var1(), FLA_Accum_T_UT_fr_ops_var1(), FLA_Apply_H2_UT_l_ops_var1(), FLA_Apply_H2_UT_r_ops_var1(), FLA_Apply_HUD_UT_l_ops_var1(), FLA_Bidiag_UT_u_step_ofs_var2(), FLA_Bidiag_UT_u_step_ofs_var3(), FLA_Bidiag_UT_u_step_ofs_var4(), FLA_Bidiag_UT_u_step_ops_var1(), FLA_Bidiag_UT_u_step_ops_var2(), FLA_Bidiag_UT_u_step_ops_var3(), FLA_Bidiag_UT_u_step_ops_var4(), FLA_Bidiag_UT_u_step_ops_var5(), FLA_Eig_gest_il_ops_var3(), FLA_Eig_gest_iu_ops_var3(), FLA_Fused_UYx_ZVx_ops_var1(), FLA_Hess_UT_step_ofs_var3(), FLA_Hess_UT_step_ops_var3(), FLA_Hess_UT_step_ops_var5(), FLA_LQ_UT_ops_var2(), FLA_QR_UT_ops_var2(), FLA_Tridiag_UT_l_step_ofs_var2(), and FLA_Tridiag_UT_l_step_ops_var2().
{ bli_scopy( m, x, incx, y, incy ); }
void bli_sdcopyv | ( | char | conj, |
int | m, | ||
float * | x, | ||
int | incx, | ||
double * | y, | ||
int | incy | ||
) |
References bli_zero_dim1().
Referenced by bli_sdcopymr(), bli_sdcopymrt(), and bli_sdcopymt().
{ float* chi; double* psi; int i; // Return early if possible. if ( bli_zero_dim1( m ) ) return; // Initialize pointers. chi = x; psi = y; for ( i = 0; i < m; ++i ) { *psi = *chi; chi += incx; psi += incy; } }
void bli_szcopyv | ( | char | conj, |
int | m, | ||
float * | x, | ||
int | incx, | ||
dcomplex * | y, | ||
int | incy | ||
) |
References bli_zero_dim1(), dcomplex::imag, and dcomplex::real.
Referenced by bli_szcopymr(), bli_szcopymrt(), and bli_szcopymt().
{ float* chi; dcomplex* psi; int i; // Return early if possible. if ( bli_zero_dim1( m ) ) return; // Initialize pointers. chi = x; psi = y; for ( i = 0; i < m; ++i ) { psi->real = *chi; psi->imag = 0.0; chi += incx; psi += incy; } }
References bli_cconjv(), bli_does_conj(), bli_zero_dim1(), dcomplex::imag, scomplex::imag, dcomplex::real, and scomplex::real.
Referenced by bli_zccopymr(), bli_zccopymrt(), and bli_zccopymt().
{ dcomplex* chi; scomplex* psi; int i; // Return early if possible. if ( bli_zero_dim1( m ) ) return; // Initialize pointers. chi = x; psi = y; for ( i = 0; i < m; ++i ) { psi->real = chi->real; psi->imag = chi->imag; chi += incx; psi += incy; } if ( bli_does_conj( conj ) ) bli_cconjv( m, y, incy ); }
References bli_does_conj(), bli_zconjv(), bli_zcopy(), and bli_zero_dim1().
Referenced by bli_zaxpymt(), bli_zaxpysmt(), bli_zaxpyv(), bli_zcopymrt(), bli_zgemv(), bli_zger(), bli_zhemv(), bli_zher(), bli_zher2(), bli_zsymmize(), bli_zsymv_blas(), bli_zsyr2_blas(), bli_zsyr_blas(), bli_ztrmv(), bli_ztrmvsx(), bli_ztrsv(), bli_ztrsvsx(), bli_zzcopymr(), bli_zzcopymrt(), bli_zzcopymt(), FLA_Accum_T_UT_fc_opz_var1(), FLA_Accum_T_UT_fr_opz_var1(), FLA_Apply_H2_UT_l_opz_var1(), FLA_Apply_H2_UT_r_opz_var1(), FLA_Apply_HUD_UT_l_opz_var1(), FLA_Bidiag_UT_u_step_ofz_var2(), FLA_Bidiag_UT_u_step_ofz_var3(), FLA_Bidiag_UT_u_step_ofz_var4(), FLA_Bidiag_UT_u_step_opz_var1(), FLA_Bidiag_UT_u_step_opz_var2(), FLA_Bidiag_UT_u_step_opz_var3(), FLA_Bidiag_UT_u_step_opz_var4(), FLA_Bidiag_UT_u_step_opz_var5(), FLA_Eig_gest_il_opz_var3(), FLA_Eig_gest_iu_opz_var3(), FLA_Fused_UYx_ZVx_opz_var1(), FLA_Hess_UT_step_ofz_var3(), FLA_Hess_UT_step_opz_var3(), FLA_Hess_UT_step_opz_var5(), FLA_LQ_UT_opz_var2(), FLA_QR_UT_opz_var2(), FLA_Tridiag_UT_l_step_ofz_var2(), and FLA_Tridiag_UT_l_step_opz_var2().
{ // Return early if possible. if ( bli_zero_dim1( m ) ) return; bli_zcopy( m, x, incx, y, incy ); if ( bli_does_conj( conj ) ) bli_zconjv( m, y, incy ); }
void bli_zdcopyv | ( | char | conj, |
int | m, | ||
dcomplex * | x, | ||
int | incx, | ||
double * | y, | ||
int | incy | ||
) |
References bli_zero_dim1(), and dcomplex::real.
Referenced by bli_zdcopymr(), bli_zdcopymrt(), and bli_zdcopymt().
{ dcomplex* chi; double* psi; int i; // Return early if possible. if ( bli_zero_dim1( m ) ) return; // Initialize pointers. chi = x; psi = y; for ( i = 0; i < m; ++i ) { *psi = chi->real; chi += incx; psi += incy; } }
void bli_zscopyv | ( | char | conj, |
int | m, | ||
dcomplex * | x, | ||
int | incx, | ||
float * | y, | ||
int | incy | ||
) |
References bli_zero_dim1(), and dcomplex::real.
Referenced by bli_zscopymr(), bli_zscopymrt(), and bli_zscopymt().
{ dcomplex* chi; float* psi; int i; // Return early if possible. if ( bli_zero_dim1( m ) ) return; // Initialize pointers. chi = x; psi = y; for ( i = 0; i < m; ++i ) { *psi = chi->real; chi += incx; psi += incy; } }