FLA_Symm_rl.c File Reference

(r)


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)

Function Documentation

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 }


Generated on Mon Jul 6 05:45:55 2009 for libflame by  doxygen 1.5.9