libflame revision_anchor
FLA_QR_UT_macro_task.c File Reference

(r)

Functions

FLA_Error FLA_QR_UT_macro_task (FLA_Obj A, FLA_Obj T, fla_qrut_t *cntl)
 

Variables

fla_qrut_t * fla_qrut_cntl_leaf
 

Function Documentation

◆ FLA_QR_UT_macro_task()

FLA_Error FLA_QR_UT_macro_task ( FLA_Obj A,
FLA_Obj T,
fla_qrut_t * cntl )
16{
17 FLA_Error r_val;
18 FLA_Obj A_flat;
19
20 if ( FLA_Obj_length( A ) > 1 )
21 {
23
24 r_val = FLA_QR_UT_internal( A_flat, T, fla_qrut_cntl_leaf );
25
26 FLASH_Copy_flat_to_hier( A_flat, 0, 0, A );
27
28 FLA_Obj_free( &A_flat );
29 }
30 else
31 {
32 r_val = FLA_QR_UT_task( *FLASH_OBJ_PTR_AT( A ), T, cntl );
33 }
34
35 return r_val;
36}
FLA_Error FLASH_Copy_flat_to_hier(FLA_Obj F, dim_t i, dim_t j, FLA_Obj H)
Definition FLASH_Copy_other.c:81
FLA_Error FLASH_Obj_create_flat_copy_of_hier(FLA_Obj H, FLA_Obj *F)
Definition FLASH_Obj.c:623
FLA_Error FLA_QR_UT_internal(FLA_Obj A, FLA_Obj T, fla_qrut_t *cntl)
Definition FLA_QR_UT_internal.c:17
fla_qrut_t * fla_qrut_cntl_leaf
Definition FLA_QR_UT_cntl_init.c:16
FLA_Error FLA_QR_UT_task(FLA_Obj A, FLA_Obj T, fla_qrut_t *cntl)
Definition FLA_QR_UT_task.c:15
dim_t FLA_Obj_length(FLA_Obj obj)
Definition FLA_Query.c:116
FLA_Error FLA_Obj_free(FLA_Obj *obj)
Definition FLA_Obj.c:588
int FLA_Error
Definition FLA_type_defs.h:47
Definition FLA_type_defs.h:159

References FLA_Obj_free(), FLA_Obj_length(), FLA_QR_UT_internal(), FLA_QR_UT_task(), fla_qrut_cntl_leaf, FLASH_Copy_flat_to_hier(), and FLASH_Obj_create_flat_copy_of_hier().

Referenced by FLA_QR_UT_internal(), and FLASH_Queue_exec_task().

Variable Documentation

◆ fla_qrut_cntl_leaf

fla_qrut_t* fla_qrut_cntl_leaf
extern

Referenced by FLA_QR_UT_macro_task().