24 if ( FLA_Cntl_matrix_type( cntl ) == FLA_HIER &&
26 FLA_Cntl_variant( cntl ) == FLA_SUBPROBLEM )
31 *FLASH_OBJ_PTR_AT( A ),
32 *FLASH_OBJ_PTR_AT( Y ),
33 *FLASH_OBJ_PTR_AT( B ),
36 else if ( FLA_Cntl_matrix_type( cntl ) == FLA_HIER &&
41 ENQUEUE_FLASH_Eig_gest( inv, uplo, A, Y, B, cntl );
45 if ( FLA_Cntl_matrix_type( cntl ) == FLA_HIER &&
50 if ( inv == FLA_INVERSE )
57 if ( inv == FLA_INVERSE )
59 if ( uplo == FLA_LOWER_TRIANGULAR )
63 else if ( uplo == FLA_UPPER_TRIANGULAR )
68 else if ( inv == FLA_NO_INVERSE )
70 if ( uplo == FLA_LOWER_TRIANGULAR )
74 else if ( uplo == FLA_UPPER_TRIANGULAR )
FLA_Bool FLASH_Queue_get_enabled(void)
Definition: FLASH_Queue.c:171
FLA_Error FLA_Eig_gest_il(FLA_Obj A, FLA_Obj Y, FLA_Obj B, fla_eig_gest_t *cntl)
Definition: FLA_Eig_gest_il.c:13
FLA_Error FLA_Eig_gest_nu(FLA_Obj A, FLA_Obj Y, FLA_Obj B, fla_eig_gest_t *cntl)
Definition: FLA_Eig_gest_nu.c:13
FLA_Error FLA_Eig_gest_iu(FLA_Obj A, FLA_Obj Y, FLA_Obj B, fla_eig_gest_t *cntl)
Definition: FLA_Eig_gest_iu.c:13
FLA_Error FLA_Eig_gest_nl(FLA_Obj A, FLA_Obj Y, FLA_Obj B, fla_eig_gest_t *cntl)
Definition: FLA_Eig_gest_nl.c:13
fla_eig_gest_t * fla_eig_gest_nx_cntl_leaf
Definition: FLA_Eig_gest_cntl_init.c:23
fla_eig_gest_t * flash_eig_gest_cntl
Definition: FLASH_Eig_gest_cntl_init.c:21
fla_eig_gest_t * fla_eig_gest_ix_cntl_leaf
Definition: FLA_Eig_gest_cntl_init.c:22
FLA_Error FLA_Eig_gest_internal(FLA_Inv inv, FLA_Uplo uplo, FLA_Obj A, FLA_Obj Y, FLA_Obj B, fla_eig_gest_t *cntl)
Definition: FLA_Eig_gest_internal.c:17
FLA_Error FLA_Eig_gest_internal_check(FLA_Inv inv, FLA_Uplo uplo, FLA_Obj A, FLA_Obj Y, FLA_Obj B, fla_eig_gest_t *cntl)
Definition: FLA_Eig_gest_internal_check.c:13
FLA_Elemtype FLA_Obj_elemtype(FLA_Obj obj)
Definition: FLA_Query.c:51
unsigned int FLA_Check_error_level(void)
Definition: FLA_Check.c:18
int FLA_Error
Definition: FLA_type_defs.h:47