FLA_Trmm_lln.c File Reference

(r)


Functions

FLA_Error FLA_Trmm_lln (FLA_Diag diag, FLA_Obj alpha, FLA_Obj A, FLA_Obj B, fla_trmm_t *cntl)

Function Documentation

FLA_Error FLA_Trmm_lln ( FLA_Diag  diag,
FLA_Obj  alpha,
FLA_Obj  A,
FLA_Obj  B,
fla_trmm_t cntl 
)

References FLA_Trmm_lln_blk_var1(), FLA_Trmm_lln_blk_var2(), FLA_Trmm_lln_blk_var3(), FLA_Trmm_lln_blk_var4(), and FLA_Trmm_lln_task().

Referenced by FLA_Trmm_internal().

00036 {
00037     FLA_Error r_val = FLA_SUCCESS;
00038     
00039     if      ( FLA_Cntl_variant( cntl ) == FLA_SUBPROBLEM )
00040     {
00041         r_val = FLA_Trmm_lln_task( diag, alpha, A, B, cntl );
00042     }
00043 #ifdef FLA_ENABLE_NON_CRITICAL_CODE
00044     else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT1 )
00045     {
00046         r_val = FLA_Trmm_lln_blk_var1( diag, alpha, A, B, cntl );
00047     }
00048 #endif
00049     else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT2 )
00050     {
00051         r_val = FLA_Trmm_lln_blk_var2( diag, alpha, A, B, cntl );
00052     }
00053     else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT3 )
00054     {
00055         r_val = FLA_Trmm_lln_blk_var3( diag, alpha, A, B, cntl );
00056     }
00057 #ifdef FLA_ENABLE_NON_CRITICAL_CODE
00058     else if ( FLA_Cntl_variant( cntl ) == FLA_BLOCKED_VARIANT4 )
00059     {
00060         r_val = FLA_Trmm_lln_blk_var4( diag, alpha, A, B, cntl );
00061     }
00062 #endif
00063     return r_val;
00064 }


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