Go to the source code of this file.
Functions | |
FLA_Error | FLA_Trinv_l (FLA_Diag diag, FLA_Obj A, fla_trinv_t *cntl) |
FLA_Error | FLA_Trinv_u (FLA_Diag diag, FLA_Obj A, fla_trinv_t *cntl) |
FLA_Error FLA_Trinv_l | ( | FLA_Diag | diag, | |
FLA_Obj | A, | |||
fla_trinv_t * | cntl | |||
) |
References FLA_Trinv_l_blk_var1(), FLA_Trinv_l_blk_var2(), FLA_Trinv_l_blk_var3(), FLA_Trinv_l_blk_var4(), and FLA_Trinv_l_task().
Referenced by FLA_Trinv_internal().
00036 { 00037 FLA_Error r_val = FLA_SUCCESS; 00038 00039 if ( FLA_Cntl_variant( cntl ) == FLA_SUBPROBLEM ) 00040 { 00041 r_val = FLA_Trinv_l_task( diag, A, cntl ); 00042 } 00043 #ifdef FLA_ENABLE_NON_CRITICAL_CODE 00044 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT1 ) 00045 { 00046 r_val = FLA_Trinv_l_blk_var1( diag, A, cntl ); 00047 } 00048 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT2 ) 00049 { 00050 r_val = FLA_Trinv_l_blk_var2( diag, A, cntl ); 00051 } 00052 #endif 00053 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT3 ) 00054 { 00055 r_val = FLA_Trinv_l_blk_var3( diag, A, cntl ); 00056 } 00057 #ifdef FLA_ENABLE_NON_CRITICAL_CODE 00058 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT4 ) 00059 { 00060 r_val = FLA_Trinv_l_blk_var4( diag, A, cntl ); 00061 } 00062 #endif 00063 00064 return r_val; 00065 }
FLA_Error FLA_Trinv_u | ( | FLA_Diag | diag, | |
FLA_Obj | A, | |||
fla_trinv_t * | cntl | |||
) |
References FLA_Trinv_u_blk_var1(), FLA_Trinv_u_blk_var2(), FLA_Trinv_u_blk_var3(), FLA_Trinv_u_blk_var4(), and FLA_Trinv_u_task().
Referenced by FLA_Trinv_internal().
00036 { 00037 FLA_Error r_val = FLA_SUCCESS; 00038 00039 if ( FLA_Cntl_variant( cntl ) == FLA_SUBPROBLEM ) 00040 { 00041 r_val = FLA_Trinv_u_task( diag, A, cntl ); 00042 } 00043 #ifdef FLA_ENABLE_NON_CRITICAL_CODE 00044 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT1 ) 00045 { 00046 r_val = FLA_Trinv_u_blk_var1( diag, A, cntl ); 00047 } 00048 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT2 ) 00049 { 00050 r_val = FLA_Trinv_u_blk_var2( diag, A, cntl ); 00051 } 00052 #endif 00053 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT3 ) 00054 { 00055 r_val = FLA_Trinv_u_blk_var3( diag, A, cntl ); 00056 } 00057 #ifdef FLA_ENABLE_NON_CRITICAL_CODE 00058 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT4 ) 00059 { 00060 r_val = FLA_Trinv_u_blk_var4( diag, A, cntl ); 00061 } 00062 #endif 00063 00064 return r_val; 00065 }