Functions | |
FLA_Error | FLA_Trsv_uc (FLA_Diag diag, FLA_Obj A, FLA_Obj x, fla_trsv_t *cntl) |
FLA_Error FLA_Trsv_uc | ( | FLA_Diag | diag, | |
FLA_Obj | A, | |||
FLA_Obj | x, | |||
fla_trsv_t * | cntl | |||
) |
References FLA_Trsv_uc_blk_var1(), FLA_Trsv_uc_blk_var2(), and FLA_Trsv_uc_task().
Referenced by FLA_Trsv_internal().
00036 { 00037 FLA_Error r_val = FLA_SUCCESS; 00038 00039 if ( FLA_Cntl_variant( cntl ) == FLA_SUBPROBLEM ) 00040 { 00041 r_val = FLA_Trsv_uc_task( diag, A, x, cntl ); 00042 } 00043 #ifdef FLA_ENABLE_NON_CRITICAL_CODE 00044 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT1 ) 00045 { 00046 r_val = FLA_Trsv_uc_blk_var1( diag, A, x, cntl ); 00047 } 00048 #endif 00049 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT2 ) 00050 { 00051 r_val = FLA_Trsv_uc_blk_var2( diag, A, x, cntl ); 00052 } 00053 00054 return r_val; 00055 }