libflame  revision_anchor
Functions | Variables
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_tfla_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 
)

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

Referenced by FLA_QR_UT_internal(), and FLASH_Queue_exec_task().

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 FLA_QR_UT_task(FLA_Obj A, FLA_Obj T, fla_qrut_t *cntl)
Definition: FLA_QR_UT_task.c:15
FLA_Error FLA_Obj_free(FLA_Obj *obj)
Definition: FLA_Obj.c:588
fla_qrut_t * fla_qrut_cntl_leaf
Definition: FLA_QR_UT_cntl_init.c:16
int FLA_Error
Definition: FLA_type_defs.h:47
Definition: FLA_type_defs.h:158
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
dim_t FLA_Obj_length(FLA_Obj obj)
Definition: FLA_Query.c:116
FLA_Error FLA_QR_UT_internal(FLA_Obj A, FLA_Obj T, fla_qrut_t *cntl)
Definition: FLA_QR_UT_internal.c:17

Variable Documentation

◆ fla_qrut_cntl_leaf

fla_qrut_t* fla_qrut_cntl_leaf