libflame  revision_anchor
Functions
FLA_LU_nopiv_solve.c File Reference

(r)

Functions

FLA_Error FLA_LU_nopiv_solve (FLA_Obj A, FLA_Obj B, FLA_Obj X)
 

Function Documentation

◆ FLA_LU_nopiv_solve()

FLA_Error FLA_LU_nopiv_solve ( FLA_Obj  A,
FLA_Obj  B,
FLA_Obj  X 
)
14 {
15  // Check parameters.
16  if ( FLA_Check_error_level() >= FLA_MIN_ERROR_CHECKING )
17  FLA_LU_nopiv_solve_check( A, B, X );
18 
19  if ( FLA_Obj_is_identical( B, X ) == FALSE )
20  FLA_Copy_external( B, X );
21 
22  FLA_Trsm_external( FLA_LEFT, FLA_LOWER_TRIANGULAR, FLA_NO_TRANSPOSE,
23  FLA_UNIT_DIAG, FLA_ONE, A, X );
24  FLA_Trsm_external( FLA_LEFT, FLA_UPPER_TRIANGULAR, FLA_NO_TRANSPOSE,
25  FLA_NONUNIT_DIAG, FLA_ONE, A, X );
26 
27  return FLA_SUCCESS;
28 }
FLA_Error FLA_LU_nopiv_solve_check(FLA_Obj A, FLA_Obj B, FLA_Obj X)
Definition: FLA_LU_nopiv_solve_check.c:13
FLA_Error FLA_Copy_external(FLA_Obj A, FLA_Obj B)
Definition: FLA_Copy_external.c:13
FLA_Error FLA_Trsm_external(FLA_Side side, FLA_Uplo uplo, FLA_Trans trans, FLA_Diag diag, FLA_Obj alpha, FLA_Obj A, FLA_Obj B)
Definition: FLA_Trsm_external.c:13
FLA_Obj FLA_ONE
Definition: FLA_Init.c:18
FLA_Bool FLA_Obj_is_identical(FLA_Obj A, FLA_Obj B)
Definition: FLA_Query.c:470
unsigned int FLA_Check_error_level(void)
Definition: FLA_Check.c:18

References FLA_Check_error_level(), FLA_Copy_external(), FLA_LU_nopiv_solve_check(), FLA_Obj_is_identical(), FLA_ONE, and FLA_Trsm_external().