libflame  revision_anchor
Functions
bl1_invscalv.c File Reference

(r)

Functions

void bl1_sinvscalv (conj1_t conj, int n, float *alpha, float *x, int incx)
 
void bl1_dinvscalv (conj1_t conj, int n, double *alpha, double *x, int incx)
 
void bl1_csinvscalv (conj1_t conj, int n, float *alpha, scomplex *x, int incx)
 
void bl1_cinvscalv (conj1_t conj, int n, scomplex *alpha, scomplex *x, int incx)
 
void bl1_zdinvscalv (conj1_t conj, int n, double *alpha, dcomplex *x, int incx)
 
void bl1_zinvscalv (conj1_t conj, int n, dcomplex *alpha, dcomplex *x, int incx)
 

Function Documentation

◆ bl1_cinvscalv()

void bl1_cinvscalv ( conj1_t  conj,
int  n,
scomplex alpha,
scomplex x,
int  incx 
)
53 {
54  scomplex alpha_inv;
55 
56  if ( bl1_ceq1( alpha ) ) return;
57 
58  bl1_cinvert2s( conj, alpha, &alpha_inv );
59 
60  bl1_cscal( n,
61  &alpha_inv,
62  x, incx );
63 }
void bl1_cscal(int n, scomplex *alpha, scomplex *x, int incx)
Definition: bl1_scal.c:52
void bl1_cinvert2s(conj1_t conj, scomplex *alpha, scomplex *beta)
Definition: bl1_invert2s.c:27
Definition: blis_type_defs.h:133

References bl1_cinvert2s(), and bl1_cscal().

Referenced by bl1_crandmr(), 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_var2(), FLA_Bidiag_UT_u_step_opc_var3(), FLA_Bidiag_UT_u_step_opc_var4(), FLA_Bidiag_UT_u_step_opc_var5(), FLA_Chol_l_opc_var2(), FLA_Chol_l_opc_var3(), FLA_Chol_u_opc_var2(), FLA_Chol_u_opc_var3(), FLA_Eig_gest_il_opc_var1(), FLA_Eig_gest_il_opc_var2(), FLA_Eig_gest_il_opc_var3(), FLA_Eig_gest_il_opc_var4(), FLA_Eig_gest_il_opc_var5(), FLA_Eig_gest_iu_opc_var1(), FLA_Eig_gest_iu_opc_var2(), FLA_Eig_gest_iu_opc_var3(), FLA_Eig_gest_iu_opc_var4(), FLA_Eig_gest_iu_opc_var5(), FLA_Househ2_UT_l_opc(), FLA_Househ3UD_UT_opc(), FLA_LU_nopiv_opc_var3(), FLA_LU_nopiv_opc_var4(), FLA_LU_nopiv_opc_var5(), FLA_LU_piv_opc_var3(), FLA_LU_piv_opc_var4(), FLA_LU_piv_opc_var5(), FLA_Trinv_ln_opc_var1(), FLA_Trinv_ln_opc_var2(), FLA_Trinv_ln_opc_var3(), FLA_Trinv_un_opc_var1(), FLA_Trinv_un_opc_var2(), and FLA_Trinv_un_opc_var3().

◆ bl1_csinvscalv()

void bl1_csinvscalv ( conj1_t  conj,
int  n,
float *  alpha,
scomplex x,
int  incx 
)
40 {
41  float alpha_inv;
42 
43  if ( bl1_seq1( alpha ) ) return;
44 
45  alpha_inv = 1.0F / *alpha;
46 
47  bl1_csscal( n,
48  &alpha_inv,
49  x, incx );
50 }
void bl1_csscal(int n, float *alpha, scomplex *x, int incx)
Definition: bl1_scal.c:39

References bl1_csscal().

◆ bl1_dinvscalv()

void bl1_dinvscalv ( conj1_t  conj,
int  n,
double *  alpha,
double *  x,
int  incx 
)

◆ bl1_sinvscalv()

void bl1_sinvscalv ( conj1_t  conj,
int  n,
float *  alpha,
float *  x,
int  incx 
)

◆ bl1_zdinvscalv()

void bl1_zdinvscalv ( conj1_t  conj,
int  n,
double *  alpha,
dcomplex x,
int  incx 
)
66 {
67  double alpha_inv;
68 
69  if ( bl1_deq1( alpha ) ) return;
70 
71  alpha_inv = 1.0 / *alpha;
72 
73  bl1_zdscal( n,
74  &alpha_inv,
75  x, incx );
76 }
void bl1_zdscal(int n, double *alpha, dcomplex *x, int incx)
Definition: bl1_scal.c:65

References bl1_zdscal().

◆ bl1_zinvscalv()

void bl1_zinvscalv ( conj1_t  conj,
int  n,
dcomplex alpha,
dcomplex x,
int  incx 
)
79 {
80  dcomplex alpha_inv;
81 
82  if ( bl1_zeq1( alpha ) ) return;
83 
84  bl1_zinvert2s( conj, alpha, &alpha_inv );
85 
86  bl1_zscal( n,
87  &alpha_inv,
88  x, incx );
89 }
void bl1_zscal(int n, dcomplex *alpha, dcomplex *x, int incx)
Definition: bl1_scal.c:78
void bl1_zinvert2s(conj1_t conj, dcomplex *alpha, dcomplex *beta)
Definition: bl1_invert2s.c:44
Definition: blis_type_defs.h:138

References bl1_zinvert2s(), and bl1_zscal().

Referenced by bl1_zrandmr(), 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_var2(), FLA_Bidiag_UT_u_step_opz_var3(), FLA_Bidiag_UT_u_step_opz_var4(), FLA_Bidiag_UT_u_step_opz_var5(), FLA_Chol_l_opz_var2(), FLA_Chol_l_opz_var3(), FLA_Chol_u_opz_var2(), FLA_Chol_u_opz_var3(), FLA_Eig_gest_il_opz_var1(), FLA_Eig_gest_il_opz_var2(), FLA_Eig_gest_il_opz_var3(), FLA_Eig_gest_il_opz_var4(), FLA_Eig_gest_il_opz_var5(), FLA_Eig_gest_iu_opz_var1(), FLA_Eig_gest_iu_opz_var2(), FLA_Eig_gest_iu_opz_var3(), FLA_Eig_gest_iu_opz_var4(), FLA_Eig_gest_iu_opz_var5(), FLA_Househ2_UT_l_opz(), FLA_Househ3UD_UT_opz(), FLA_LU_nopiv_opz_var3(), FLA_LU_nopiv_opz_var4(), FLA_LU_nopiv_opz_var5(), FLA_LU_piv_opz_var3(), FLA_LU_piv_opz_var4(), FLA_LU_piv_opz_var5(), FLA_Trinv_ln_opz_var1(), FLA_Trinv_ln_opz_var2(), FLA_Trinv_ln_opz_var3(), FLA_Trinv_un_opz_var1(), FLA_Trinv_un_opz_var2(), and FLA_Trinv_un_opz_var3().