23 if ( FLA_Cntl_matrix_type( cntl ) == FLA_HIER &&
25 FLA_Cntl_variant( cntl ) == FLA_SUBPROBLEM )
29 *FLASH_OBJ_PTR_AT( A ),
30 *FLASH_OBJ_PTR_AT( B ),
33 else if ( FLA_Cntl_matrix_type( cntl ) == FLA_HIER &&
38 ENQUEUE_FLASH_Copyr( uplo, A, B, cntl );
42 if ( FLA_Cntl_matrix_type( cntl ) == FLA_HIER &&
51 if ( uplo == FLA_LOWER_TRIANGULAR )
55 else if ( uplo == FLA_UPPER_TRIANGULAR )
FLA_Bool FLASH_Queue_get_enabled(void)
Definition: FLASH_Queue.c:171
FLA_Error FLA_Copyr_u(FLA_Obj A, FLA_Obj B, fla_copyr_t *cntl)
Definition: FLA_Copyr_u.c:13
FLA_Error FLA_Copyr_l(FLA_Obj A, FLA_Obj B, fla_copyr_t *cntl)
Definition: FLA_Copyr_l.c:13
fla_copyr_t * flash_copyr_cntl_blas
Definition: FLASH_Copyr_cntl_init.c:15
FLA_Error FLA_Copyr_internal(FLA_Uplo uplo, FLA_Obj A, FLA_Obj B, fla_copyr_t *cntl)
Definition: FLA_Copyr_internal.c:16
fla_copyr_t * flash_copyr_cntl
Definition: FLASH_Copyr_cntl_init.c:16
FLA_Error FLA_Copyr_internal_check(FLA_Uplo uplo, FLA_Obj A, FLA_Obj B, fla_copyr_t *cntl)
Definition: FLA_Copyr_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