16 #ifdef FLA_ENABLE_EXTERNAL_LAPACK_INTERFACES 47 float* buff_A = (
float * ) FLA_FLOAT_PTR( A );
48 float* buff_d = (
float * ) FLA_FLOAT_PTR( d );
49 float* buff_e = (
float * ) FLA_FLOAT_PTR( e );
50 float* buff_tu = (
float * ) FLA_FLOAT_PTR( tu );
51 float* buff_tv = (
float * ) FLA_FLOAT_PTR( tv );
52 float* buff_work = (
float * ) FLA_FLOAT_PTR( work_obj );
69 double* buff_A = (
double * ) FLA_DOUBLE_PTR( A );
70 double* buff_d = (
double * ) FLA_DOUBLE_PTR( d );
71 double* buff_e = (
double * ) FLA_DOUBLE_PTR( e );
72 double* buff_tu = (
double * ) FLA_DOUBLE_PTR( tu );
73 double* buff_tv = (
double * ) FLA_DOUBLE_PTR( tv );
74 double* buff_work = (
double * ) FLA_DOUBLE_PTR( work_obj );
92 float* buff_d = (
float * ) FLA_FLOAT_PTR( d );
93 float* buff_e = (
float * ) FLA_FLOAT_PTR( e );
111 case FLA_DOUBLE_COMPLEX:
114 double* buff_d = (
double * ) FLA_DOUBLE_PTR( d );
115 double* buff_e = (
double * ) FLA_DOUBLE_PTR( e );
139 FLA_Check_error_code( FLA_EXTERNAL_LAPACK_NOT_IMPLEMENTED );
FLA_Error FLA_Obj_create(FLA_Datatype datatype, dim_t m, dim_t n, dim_t rs, dim_t cs, FLA_Obj *obj)
Definition: FLA_Obj.c:55
int F77_cgebd2(int *m, int *n, scomplex *a, int *lda, float *d, float *e, scomplex *tauq, scomplex *taup, scomplex *work, int *info)
FLA_Error FLA_Obj_free(FLA_Obj *obj)
Definition: FLA_Obj.c:588
FLA_Error FLA_Bidiag_check(FLA_Obj A, FLA_Obj tu, FLA_Obj tv)
Definition: FLA_Bidiag_check.c:13
FLA_Datatype FLA_Obj_datatype(FLA_Obj obj)
Definition: FLA_Query.c:13
Definition: FLA_type_defs.h:158
FLA_Bool FLA_Obj_has_zero_dim(FLA_Obj A)
Definition: FLA_Query.c:400
dim_t FLA_Obj_width(FLA_Obj obj)
Definition: FLA_Query.c:123
int F77_zgebd2(int *m, int *n, dcomplex *a, int *lda, double *d, double *e, dcomplex *tauq, dcomplex *taup, dcomplex *work, int *info)
FLA_Datatype FLA_Obj_datatype_proj_to_real(FLA_Obj A)
Definition: FLA_Query.c:23
Definition: blis_type_defs.h:132
int F77_sgebd2(int *m, int *n, float *a, int *lda, float *d, float *e, float *tauq, float *taup, float *work, int *info)
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_max_dim(FLA_Obj obj)
Definition: FLA_Query.c:160
dim_t FLA_Obj_col_stride(FLA_Obj obj)
Definition: FLA_Query.c:174
int F77_dgebd2(int *m, int *n, double *a, int *lda, double *d, double *e, double *tauq, double *taup, double *work, int *info)
dim_t FLA_Obj_length(FLA_Obj obj)
Definition: FLA_Query.c:116
Definition: blis_type_defs.h:137
dim_t FLA_Obj_min_dim(FLA_Obj obj)
Definition: FLA_Query.c:153