16 #ifdef FLA_ENABLE_EXTERNAL_LAPACK_INTERFACES
54 lwork = max( 1.0, 2.0 * n_A - 2 );
63 float* buff_A = (
float * ) FLA_FLOAT_PTR( A );
64 float* buff_d = (
float * ) FLA_FLOAT_PTR( d_use );
65 float* buff_e = (
float * ) FLA_FLOAT_PTR( e_use );
66 float* buff_work = (
float * ) FLA_FLOAT_PTR( work );
81 double* buff_A = (
double * ) FLA_DOUBLE_PTR( A );
82 double* buff_d = (
double * ) FLA_DOUBLE_PTR( d_use );
83 double* buff_e = (
double * ) FLA_DOUBLE_PTR( e_use );
84 double* buff_work = (
double * ) FLA_DOUBLE_PTR( work );
100 float* buff_d = (
float * ) FLA_FLOAT_PTR( d_use );
101 float* buff_e = (
float * ) FLA_FLOAT_PTR( e_use );
102 float* buff_work = (
float * ) FLA_FLOAT_PTR( work );
115 case FLA_DOUBLE_COMPLEX:
118 double* buff_d = (
double* ) FLA_DOUBLE_PTR( d_use );
119 double* buff_e = (
double* ) FLA_DOUBLE_PTR( e_use );
120 double* buff_work = (
double* ) FLA_DOUBLE_PTR( work );
149 FLA_Check_error_code( FLA_EXTERNAL_LAPACK_NOT_IMPLEMENTED );
FLA_Error FLA_Copy(FLA_Obj A, FLA_Obj B)
Definition: FLA_Copy.c:15
int F77_ssteqr(char *jobz, int *n, float *d, float *e, float *z, int *ldz, float *work, int *info)
int F77_csteqr(char *jobz, int *n, float *d, float *e, scomplex *z, int *ldz, float *work, int *info)
int F77_dsteqr(char *jobz, int *n, double *d, double *e, double *z, int *ldz, double *work, int *info)
int F77_zsteqr(char *jobz, int *n, double *d, double *e, dcomplex *z, int *ldz, double *work, int *info)
void FLA_Param_map_flame_to_netlib_evd_type(FLA_Evd_type evd_type, void *lapack_evd_type)
Definition: FLA_Param.c:151
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
FLA_Bool FLA_Obj_has_zero_dim(FLA_Obj A)
Definition: FLA_Query.c:400
FLA_Datatype FLA_Obj_datatype_proj_to_real(FLA_Obj A)
Definition: FLA_Query.c:23
dim_t FLA_Obj_col_stride(FLA_Obj obj)
Definition: FLA_Query.c:174
FLA_Error FLA_Obj_free(FLA_Obj *obj)
Definition: FLA_Obj.c:588
dim_t FLA_Obj_vector_inc(FLA_Obj obj)
Definition: FLA_Query.c:145
dim_t FLA_Obj_vector_dim(FLA_Obj obj)
Definition: FLA_Query.c:137
FLA_Datatype FLA_Obj_datatype(FLA_Obj obj)
Definition: FLA_Query.c:13
int FLA_Datatype
Definition: FLA_type_defs.h:49
Definition: FLA_type_defs.h:159
Definition: blis_type_defs.h:138
Definition: blis_type_defs.h:133