37 float *buff_A = (
float * ) FLA_FLOAT_PTR( A );
38 float *buff_alpha = (
float * ) FLA_FLOAT_PTR( alpha );
51 double *buff_A = (
double * ) FLA_DOUBLE_PTR( A );
52 double *buff_alpha = (
double * ) FLA_DOUBLE_PTR( alpha );
66 if ( datatype_alpha == FLA_COMPLEX )
81 float *buff_alpha = (
float * ) FLA_FLOAT_PTR( alpha );
94 case FLA_DOUBLE_COMPLEX:
96 if ( datatype_alpha == FLA_DOUBLE_COMPLEX )
106 buff_A, rs_A, cs_A );
111 double *buff_alpha = (
double * ) FLA_DOUBLE_PTR( alpha );
118 buff_A, rs_A, cs_A );
unsigned long dim_t
Definition: FLA_type_defs.h:71
conj1_t
Definition: blis_type_defs.h:79
dim_t FLA_Obj_row_stride(FLA_Obj obj)
Definition: FLA_Query.c:167
void bl1_dscalediag(conj1_t conj, int offset, int m, int n, double *sigma, double *a, int a_rs, int a_cs)
Definition: bl1_scalediag.c:34
void bl1_csscalediag(conj1_t conj, int offset, int m, int n, float *sigma, scomplex *a, int a_rs, int a_cs)
Definition: bl1_scalediag.c:55
void bl1_sscalediag(conj1_t conj, int offset, int m, int n, float *sigma, float *a, int a_rs, int a_cs)
Definition: bl1_scalediag.c:13
FLA_Datatype FLA_Obj_datatype(FLA_Obj obj)
Definition: FLA_Query.c:13
dim_t FLA_Obj_width(FLA_Obj obj)
Definition: FLA_Query.c:123
FLA_Error FLA_Scale_diag_check(FLA_Conj conj, FLA_Obj alpha, FLA_Obj A)
Definition: FLA_Scale_diag_check.c:13
Definition: blis_type_defs.h:132
void bl1_zscalediag(conj1_t conj, int offset, int m, int n, dcomplex *sigma, dcomplex *a, int a_rs, int a_cs)
Definition: bl1_scalediag.c:123
unsigned int FLA_Check_error_level(void)
Definition: FLA_Check.c:18
void FLA_Param_map_flame_to_blis_conj(FLA_Conj conj, conj1_t *blis_conj)
Definition: FLA_Param.c:269
int FLA_Datatype
Definition: FLA_type_defs.h:49
dim_t FLA_Obj_col_stride(FLA_Obj obj)
Definition: FLA_Query.c:174
void bl1_cscalediag(conj1_t conj, int offset, int m, int n, scomplex *sigma, scomplex *a, int a_rs, int a_cs)
Definition: bl1_scalediag.c:99
dim_t FLA_Obj_length(FLA_Obj obj)
Definition: FLA_Query.c:116
void bl1_zdscalediag(conj1_t conj, int offset, int m, int n, double *sigma, dcomplex *a, int a_rs, int a_cs)
Definition: bl1_scalediag.c:77
Definition: blis_type_defs.h:137