Functions | |
FLA_Error | FLA_Symm_rl (FLA_Obj alpha, FLA_Obj A, FLA_Obj B, FLA_Obj beta, FLA_Obj C, fla_symm_t *cntl) |
FLA_Error FLA_Symm_rl | ( | FLA_Obj | alpha, | |
FLA_Obj | A, | |||
FLA_Obj | B, | |||
FLA_Obj | beta, | |||
FLA_Obj | C, | |||
fla_symm_t * | cntl | |||
) |
References FLA_Symm_rl_blk_var1(), FLA_Symm_rl_blk_var10(), FLA_Symm_rl_blk_var2(), FLA_Symm_rl_blk_var3(), FLA_Symm_rl_blk_var4(), FLA_Symm_rl_blk_var5(), FLA_Symm_rl_blk_var6(), FLA_Symm_rl_blk_var7(), FLA_Symm_rl_blk_var8(), FLA_Symm_rl_blk_var9(), and FLA_Symm_rl_task().
Referenced by FLA_Symm_internal().
00036 { 00037 FLA_Error r_val = FLA_SUCCESS; 00038 00039 if ( FLA_Cntl_variant( cntl ) == FLA_SUBPROBLEM ) 00040 { 00041 r_val = FLA_Symm_rl_task( alpha, A, B, beta, C, cntl ); 00042 } 00043 #ifdef FLA_ENABLE_NON_CRITICAL_CODE 00044 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT1 ) 00045 { 00046 r_val = FLA_Symm_rl_blk_var1( alpha, A, B, beta, C, cntl ); 00047 } 00048 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT2 ) 00049 { 00050 r_val = FLA_Symm_rl_blk_var2( alpha, A, B, beta, C, cntl ); 00051 } 00052 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT3 ) 00053 { 00054 r_val = FLA_Symm_rl_blk_var3( alpha, A, B, beta, C, cntl ); 00055 } 00056 #endif 00057 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT4 ) 00058 { 00059 r_val = FLA_Symm_rl_blk_var4( alpha, A, B, beta, C, cntl ); 00060 } 00061 #ifdef FLA_ENABLE_NON_CRITICAL_CODE 00062 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT5 ) 00063 { 00064 r_val = FLA_Symm_rl_blk_var5( alpha, A, B, beta, C, cntl ); 00065 } 00066 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT6 ) 00067 { 00068 r_val = FLA_Symm_rl_blk_var6( alpha, A, B, beta, C, cntl ); 00069 } 00070 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT7 ) 00071 { 00072 r_val = FLA_Symm_rl_blk_var7( alpha, A, B, beta, C, cntl ); 00073 } 00074 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT8 ) 00075 { 00076 r_val = FLA_Symm_rl_blk_var8( alpha, A, B, beta, C, cntl ); 00077 } 00078 #endif 00079 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT9 ) 00080 { 00081 r_val = FLA_Symm_rl_blk_var9( alpha, A, B, beta, C, cntl ); 00082 } 00083 #ifdef FLA_ENABLE_NON_CRITICAL_CODE 00084 else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT10 ) 00085 { 00086 r_val = FLA_Symm_rl_blk_var10( alpha, A, B, beta, C, cntl ); 00087 } 00088 #endif 00089 return r_val; 00090 }