libflame  revision_anchor
Functions
FLA_UDdate_UT_update_rhs.c File Reference

(r)

Functions

FLA_Error FLA_UDdate_UT_update_rhs (FLA_Obj T, FLA_Obj bR, FLA_Obj C, FLA_Obj bC, FLA_Obj D, FLA_Obj bD)
 

Function Documentation

◆ FLA_UDdate_UT_update_rhs()

FLA_Error FLA_UDdate_UT_update_rhs ( FLA_Obj  T,
FLA_Obj  bR,
FLA_Obj  C,
FLA_Obj  bC,
FLA_Obj  D,
FLA_Obj  bD 
)
16 {
17  FLA_Obj W;
18  FLA_Obj bC_copy;
19  FLA_Obj bD_copy;
20 
21  // Check parameters.
22  if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
23  FLA_UDdate_UT_update_rhs_check( T, bR, C, bC, D, bD );
24 
25  // Create workspace according to the algorithmic blocksize (length of T)
26  // and the number of right-hand sides.
28 
29  // Make temporary copies of the bC and bD right-hand side objects so we
30  // don't destory their original contents.
31  FLA_Obj_create_copy_of( FLA_NO_TRANSPOSE, bC, &bC_copy );
32  FLA_Obj_create_copy_of( FLA_NO_TRANSPOSE, bD, &bD_copy );
33 
34  // Apply the updowndating Q' to the right-hand sides.
35  FLA_Apply_QUD_UT( FLA_LEFT, FLA_CONJ_TRANSPOSE, FLA_FORWARD, FLA_COLUMNWISE,
36  T, W,
37  bR,
38  C, bC_copy,
39  D, bD_copy );
40 
41  // Free the temporary objects.
42  FLA_Obj_free( &bC_copy );
43  FLA_Obj_free( &bD_copy );
44 
45  // Free the workspace object.
46  FLA_Obj_free( &W );
47 
48  return FLA_SUCCESS;
49 }
FLA_Error FLA_Apply_QUD_UT(FLA_Side side, FLA_Trans trans, FLA_Direct direct, FLA_Store storev, FLA_Obj T, FLA_Obj W, FLA_Obj R, FLA_Obj U, FLA_Obj C, FLA_Obj V, FLA_Obj D)
Definition: FLA_Apply_QUD_UT.c:16
FLA_Error FLA_Apply_QUD_UT_create_workspace(FLA_Obj T, FLA_Obj R, FLA_Obj *W)
Definition: FLA_Apply_QUD_UT_create_workspace.c:13
FLA_Error FLA_UDdate_UT_update_rhs_check(FLA_Obj T, FLA_Obj bR, FLA_Obj C, FLA_Obj bC, FLA_Obj D, FLA_Obj bD)
Definition: FLA_UDdate_UT_update_rhs_check.c:13
FLA_Error FLA_Obj_create_copy_of(FLA_Trans trans, FLA_Obj old, FLA_Obj *obj)
Definition: FLA_Obj.c:345
unsigned int FLA_Check_error_level(void)
Definition: FLA_Check.c:18
FLA_Error FLA_Obj_free(FLA_Obj *obj)
Definition: FLA_Obj.c:588
Definition: FLA_type_defs.h:159

References FLA_Apply_QUD_UT(), FLA_Apply_QUD_UT_create_workspace(), FLA_Check_error_level(), FLA_Obj_create_copy_of(), FLA_Obj_free(), and FLA_UDdate_UT_update_rhs_check().