36 float* buff_A = (
float * ) FLA_FLOAT_PTR( A );
37 float* buff_maxabs = (
float * ) FLA_FLOAT_PTR( maxabs );
49 double* buff_A = (
double * ) FLA_DOUBLE_PTR( A );
50 double* buff_maxabs = (
double * ) FLA_DOUBLE_PTR( maxabs );
62 if ( dt_maxabs == FLA_FLOAT )
65 float* buff_maxabs = (
float * ) FLA_FLOAT_PTR( maxabs );
80 &(buff_maxabs->
real) );
82 buff_maxabs->
imag = 0.0;
88 case FLA_DOUBLE_COMPLEX:
90 if ( dt_maxabs == FLA_DOUBLE )
93 double* buff_maxabs = (
double * ) FLA_DOUBLE_PTR( maxabs );
108 &(buff_maxabs->
real) );
110 buff_maxabs->
imag = 0.0;
float real
Definition: blis_type_defs.h:134
void bl1_dmaxabsm(int m, int n, double *a, int a_rs, int a_cs, double *maxabs)
Definition: bl1_maxabsm.c:58
unsigned long dim_t
Definition: FLA_type_defs.h:71
void bl1_cmaxabsm(int m, int n, scomplex *a, int a_rs, int a_cs, float *maxabs)
Definition: bl1_maxabsm.c:103
double imag
Definition: blis_type_defs.h:139
dim_t FLA_Obj_row_stride(FLA_Obj obj)
Definition: FLA_Query.c:167
double real
Definition: blis_type_defs.h:139
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
void bl1_smaxabsm(int m, int n, float *a, int a_rs, int a_cs, float *maxabs)
Definition: bl1_maxabsm.c:13
Definition: blis_type_defs.h:132
void bl1_zmaxabsm(int m, int n, dcomplex *a, int a_rs, int a_cs, double *maxabs)
Definition: bl1_maxabsm.c:148
unsigned int FLA_Check_error_level(void)
Definition: FLA_Check.c:18
int FLA_Datatype
Definition: FLA_type_defs.h:49
dim_t FLA_Obj_col_stride(FLA_Obj obj)
Definition: FLA_Query.c:174
FLA_Error FLA_Max_abs_value_check(FLA_Obj A, FLA_Obj amax)
Definition: FLA_Max_abs_value_check.c:13
dim_t FLA_Obj_length(FLA_Obj obj)
Definition: FLA_Query.c:116
float imag
Definition: blis_type_defs.h:134
Definition: blis_type_defs.h:137